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ABSTRACT 
THESE PROGRAMS TEST THE FP! IN ALL MODES w; 


PATT ER NS. __THE PROGRAMS soup SE RUN iN 
2 PASSES WITH ALL SWITCHES OCwN. 


REQUIREMENTS 


EQUIPMENT 


SDPLI/4S STANDSRD COMPUTER WITH FPLL TPTION 


~~ A ~~ 

= Fe S 

wit: we 

~ STS ? - TIN -=- —-_ wre a? - = ¢ FS 
PROGRAM 5S ORES 35 - THE ROL «’ ES ws Den EMOe) = fs i 


SSELIMINERY PROSSHMS 


NONE 


LOADING PROCEDURE 


USE STANDARD PROCEDURE FOF AES "RPES. 


STSETING PROCEDURE 


pp NTRO 


CONTROL SWITCH SETTINGS 


SEE 5.1.1 (ALL DOWN FOR WORST CASE TESTING 


STARTING ADDRESS 
THE PROGRAM SHOULD ALWAYS SE STSRTED AT cle. 


PROGRAM AND/OR OPERATOR ACTION 


1) LOAD PROGRAM INTO MEMCRY USING ASS LOMDER. 
2; LOAD ADDRESS 200, pre 
3) SET ahi TCHES (SEE SEC 5.1.1) ALL COWN FOR WORST CASE 

4) PRESS START veeuicd 
c. THE PROGRAM Wii LOOP AND BELL WILL a ING OUNCE ers’ FHS 
&) & MINIMUM OF TWO PASSES SHOULD ALWAYS SE RUN. 


ey 
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DATA DISPLAY SWITCH TO THE DISPLAY POSITION. 


OPERATING PROCEDURE 


an 


an 


of OPERATIONAL SWITCH SETTINGS 


~ 38 200 .. ALL aes DOWN 1S WORST CASE TESTING. IF 
AN ERROR OCCURS, THAT JEST WILL BE LOOPED 2PON NTI 
COMPLETION OF eSé CONSECUTIVE passes Oe NC ERRORS 

SUBTEST [IF SW<9> SE? A i. E BELL WILL SING | UP os 
COMPLETION OF A PASS. 


rt 


SWITCH SETTINGS APE: 


SWi1S> =] ..... HALT ON ERROR 

SCOPE LOOP 

...-» INHIBIT PRINTOUT 

Semcon INHIBIT TRACE TRAPPING 
peers INHIBIT ITERATIONS SF SUSTEST 
Semen BELL ON ERRO 

Oe iia BELL ON as, COMPLETE 

Sensi LOOP ON ERROR 

Giiecba LOOP ON TEST IN SW«‘7:0> 
Pee LOAD SW<7:0> INTO UB REGISTER 


ant 
. 
o-« 
. 
et 


w 
= 
~- 
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tb te te bt oe 8 
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cD 
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SUBROUTINE ABSTRACT 
SCOPE 


THIS SUBROUTINE CALL IS PLACED BETWEEN EACH SUBTEST IN 
INSTRUCTION. SECTION. 11 RECORDS THE STARTING RODRESS 
EACH SUBTEST AS IT IS BEING ENTERED IN LOCATION “LADS. IF 
SCOPE LOOP 1S REGUESTED, THE CURRENT SUBTEST WILL BE LOOP 
N. 3 WA} ON A 1 INH NHISITS ITERATION OF SUBTEST ih 
CONTENTS PAO MAY BE SED T0 DETERMINE THE LAST SUBTES 
SePuLLY COMPLETED. 


uy ont 
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THIS ROUTINE PRINTS OUT AN ERROR MESSAGE (SEE &$.1 

IS EXECUTED, THE SUSTEST WILL BE LOOPED ry U 
CONSECUTIVE GOOD te RRE ren a “4 Suc} TS OQ 
TG INHIBIT rYPEQUT S, PUT SW< 12> ON 
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DESCRIPTION 


3.&.8 TRTIRAP 


iF. Su<!2> IS ON AO, Te. Y BIT WILL GE SET ON ALTERNATE 
PASSES... WHEN SET ere GE TER EACH INSTRUCTION. 
ast INSTRUCTION EXECL D. UPON TRAPPIN “AN “RTT 
wc RETURNS 10. THE INTERRUPTED SEQUENCE SF fF) PRUCTIONS, 
THIS se QUENC CE'IS CONTINUED UNTIL THE ENO OF THE PROGRAM 7 


5.2.4  TRAPCATCHER 
a". #2" = CHALT® SEQUENCE IS REPEATED FROM O = 776 To CATCH 
ANY. UNEXPECTED THUS ANY UNEXPECTED TRAPS if 
SNTERUPTS WILL HALT AT THE VESTER 2 2. 

5.2.5 FLOATING POINT TRAP (TO 244) 
THE FP11 INTERRUPT DISABLE SIT IS ALWAYS SET IN ALL OF THESE 
TESTS. (EXCEPT OGFPA? SOND TRAPS TO 244 SHOULD OCCUR. IF AN 
INTERRUPT OCCURS, THE PROGRAM WILL HALT AT 766 IN THE 
ROUTINE CALLED FLTERR AND DISPLAY THE FPS REGISTER IN RO. 

e. ERRORS 

6.1 ERROR PRINTOUT 


THE FORMAT IS AS FOLLOWS: 
ROR FPS ANS) ANSe ANSZ ANSY ANSS ANSE ANST ANSE 
FEC FEA 


BODRESS OF ERROR HLT 
FLOATING POINT STATUS ; 

FLOATING EXCEPTION CODES (ERROR CODES) 

FLOATING EXCEPTION AODRESS (ERROR OORESS 

ERROR DATA SEAD FRON THE FPL, -2 OF 

RAY BE TYPED DEPENDING ON THE NUMBER FOLL SWING 

HLT; I.£., HLT+3 WOULD TYPE ANS1-ANS3. 


NO THE FRILING TEST, LOOK AT THE LISTING ABOVE THE 
SS TYPED. 
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IDOW: 
ob 08 be be te 
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DESCRIPTION 


6.¢ ERROR RECOVERY 
RESTART AT 200 


¥< RESTRICTIONS 
NONE 

8. MISCELL ANEOUS 

8.1 EXECUTION TIME 


A BELL WILL RING WITHIN 15 SECONDS WITH ALL SWITCHES DOWN. 


8.2 STRUCK POINTER 
STACK IS INITALLY SET TO 600 

8.3 POWER FAIL 
EACH TEST CAN BE POWER FAILED WITH NO ERRORS EXCEPT ON THE 
FEC AND FEA. Ny USE, START THE TEST AS USUAL AND POWER DOWN 
THEN UP AT ANY TIME. THE PROGRAM SHOULD TYPE “POWER AND 
CONTINUE TO RUN WITH NO OTHER TYPEOUTS. 

9. PROGRAM OrSCRIPTION 


THESE on oy TEST al THE INSTRUCTIONS a THE FP1i IN Rut 
0 AM HAS MANY SUB ni S (THE CODE BETWEEN 2 
SCOPE STATEMENTS) HICH ARE RUN 2S6 TIMES BEFORE CONTINUING 


cL 100 AND DIS é 
CONTAIN THE ITERATION COUNT IN THE LEFT BYTE AND THE TEST 
NUMBER IN THE RIGHT BYTE. ALL THE SUBTESTS SHOULD BE ay 
SEQUENTIALLY BY STARTING AT 200 NOT BY STARTING AT THE 
BEGI oy y THE SUBTEST. TO LOOP ON A aro? ITE yi 


ie S 
UPON UNTIL SW<8> IS PUT ON A O OR THE RIGHT BYTE IS CHANGED. 
IF _ € Test 1S NON-EXISTANT. THE PROGRAM WILL SE RUN RS 


USU 
. ENDR 
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. TITLE MAINDEC-11-DCFPK-8 TEST OF LDEXP, STEXP 
:COPYRIGHT 1972, DIGITA AL EQUIPMENT CORP.. MAYNARD. MASS 
“PROGRAM BY KEN CHAPMAN 
"REM# 
SWITCH USE 
¢ 0 - LOAD UB REGISTER WITH Swi7:0> 
1 - LOOP ON TEST IN SW<7:0> 
3 LOOP ON ERROR 
ic 0 - BELL ON PASS COMPLETE 
1 - BELL ON ERROR 
ll INHIBIT ITERATIONS 
le INHIBIT TRACE TRAP 
13 INHIBIT ERROR TYPEOUTS 
14 LOOP ON TEST 
15 HALT ON ERROR 


OUTPUT FORM: 
ADR scr — ANS2 ANS? ANSY ANSS ANSE ANS? ANSE 


FPS i FEC - 

SIT REASON CODE ERROR 

0 CARRY 0 ADDRESS a 
1 OVERFLOW e OPCODE ERR 

c ZERO “ DIVIDE 

3 NEGATIVE a 

4 MAINTAINANCE MODE 10 

S TRUNCATE MODE le UNDERFL OW 

6 LONG INT 14 

7 DOUBLE PRECISION MODE lg UBRERK TRAP 
z INTERUPT ON CONVERSION ERROR 

3 INTERUPT ON OVERF be 

10 INTERUPT ON UNDERFLOW 

+s INTERUPT ON UNDEFINED VARIASLE 

l3 

14 od a oy OISABLE 

\§ ERROR FLAG 


BY SERS 
tal ae ERROR 
OVERFLOW 


. UNDEFINED VARIABLE ¢ 


of? ) 


= / 
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DCFPKE.P LI MACRO'S AND ASSIGNMENTS 
, rm ABS 
i PS= ooecR 
17787 SWR= 17757 
17787 DISPLAY=SWR 
194490 SCOPE= TRAP 
104900 HLT= EMT 
§90904 TYPE= 
= Bpet= 53” 
OCOO0G RO= %0 
000901 Rl= A 
0002 Re= 42 
000003 R3= hed 
0004 R4= 44 
0005 RS= “5 
O00005 TTY= 45 
OCOO0E SP= As 
900007 PC= 47 
0000 ACO= AB 
000001 ACI= %1 
002 Av2= a4 
00003 ac3= 43 
00004 ACY= “4 
000005 AcS= %. 
1000809 SWiS= 100000 
049009 Swid= 40000 
020000 SW13= 0000 
019000 CWle= 10000 
0604098 SWil= 4000 
00 SWi0= 2000 
001006 SWO9= 1000 
000400 SWOS= 40 
170003 LDUB= 170003 
170005 STag= 170005 
170007 STGO= 170007 
170006 MRS= 17000 
170004 LOSC= # 170004 
vocooo .s 6 -TRAP CATCHER FROM O - 776 
000290 2 209 
O00200 g00167 go0t2e IMP BEG 
098760 760 
050760 170200 | ELTERR: STFPS FPS 
OSC7be 170367 coooa4 cTsT FEC 
oC7be 600000 HALT 
CO0778 00ode RT] 
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MAINDEC- 
DCFPKB.P1] SETUP AND ANSWER AREA 
= 000 

001900 BRARB ICNT: : -ITERATION COUNT - LH TEST NO. - RH 

001902 900000 ANSI: 0 “FIRST ANSWER (SEE CODE) 

091004 900000 ANSe: QO 

am Gee ge 

pb ote 0090 ANSS: : 

01014 ANSE: 0 

901016 oo0000 ANS7: 0 

p0:9290 900000 ANS8: OO 

001022 990000 FEC 0 sFLOATING EXCEPTION CODES_ 

001024 FEA 0 ‘FLOATING EXECPTION ADDRESS 

001026 012706 O00600 BEG: MOV #609, SP -#% STACK AT 500 ## . 

901032 012737 O01054 oo0004 MOV gMlicO, a#4 ‘FIND OUT WHICH MACHINE THIS IS 

001040 605737 177772 - TST 34177772 -IS PIRQ ? 

901044 012767 Oo0000& 007352 MOV #6. YESRT ‘FUDGE IN RTT IF 11/45 

991952 900403 BR BEGIN 


0010S4 016737 O10S06 9900015 MlleO: MOV FPTADR, #10 ;LOAD THE ILLEGAL INSTRUCTION VECTOR 
; WITH THE ADDRESS OF T PU. 
;_THE é WILL HANDLE THE BAD OPCODES 


001062 012737 OO0006 OOC0D4 BEGIN: MOV #6, a84 : RESET 
001070 012706 OO0600 MOV #600 oP 

001074 012737 O104e4 000014 MOV #YESRT, 0814 :SET TRACE TRAP VECTOR 
091102 012777 O11264 O10464 MOV #POWDWN, JDWNVEC 

001110 012777 O00340 010460 MOV #340, JDWNVEC+ 

001116 012737 0114.4 o00020 MOV #. 10T. a820 -SET UP VECTOR 20 
001124 012700 900030 MOV #30, RO -SET RO TO VECTOR 30 
001130 612720 O10S66 MOV #. TRP. (0)+ -SET EMT VECTOR 

001134 012720 000340 MOV #340, (0)+ 

001140 Ole720 O10426 MOV #.EMT. (0)+ :SET TRAP VECTOR 
991144 012710 9000340 MOV #340, [0) 

001150 012777 OO00760 o1p41e MOY #FLTERR, SFPVECT :LOAD INTERUPT VECTOR 
001156 012777 O00340 o10406 MOV $240, SFPVECT +e “LOCK UP PROCESSOR 
091164 005067 177610 CLR ICN 

001170 005067 010414 CLR LAD 


001174 
00117 


001260 


00262 
001264 


OCicb 
O0ie72 


OCi316 
001320 


001334 


01336 
Cist4 
001346 


“ait 1-DCFPK-8 


104400 
000402 
O2SeSe 
1701e7 


174267 
001401 
104002 
G22767 
002-91 
104002 


104400 
0004Ge2 


137777 
170127 


104098 
174167 


io4o02 


Cee767 
001401 
10400e 


TEST OF 
TEST SECTION 


177544 
04005e 


12eSeSe 


177777 
047417 
177764 
o0ocos 


047410 


177456 
WS1377 6177450 


177777 = 177440 


DEXP, STEXP 
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eet ic TEST LOE (108) DOQENT), FLOATING ME 


hod It nooo --5 -uekeeS seb 


a oMOse, ieee TING MODE 


FPS = 047400 SRC = Me-R7 AC = 
 sROEREOREREREREGEST AREAS ESERNSROSSHESEORSEERSSTONSESESSORGEEHERESESEEES 


DAT1: 
TSTl: 
FPT I: 


SCOPE 

BR TST1 
O2SeSe, 1eSeSe 
LDFPS #047417 


OF DAT!. Ace 
#900000, ace 


F 
CMP =: #047400, FPS 
+4 


ace ANS! 
CMP #040052, ANS! 


CMP #1252Se,ANSe 
+4 


;LOAD FLOATING POINT STATUS 
; LOAD OeSeSe, leSeS2 INTO ACe 
LOAD 000000 INTO THE EXPONENT OF AC2 
sSTORE FLOATING POINT STATUS 
; CHECK t a'e POINT STATUS 
‘BRANCH IF 
FPS NOT EQUAL TO 047400 


; STORE KARL ANS1, ANS2 


H IF OK 
ANS 1 NOT EQUAL TO 040052 


;CHECK ANS2 
‘BRANCH IF OK 
sANS2 NOT EQUAL TO 125252 


}-+-1-+- 4a b+ gt iota bah tb bbb ad tbl hth 


TEST 
90005 ==> ==) Mahdi 


047 baa” 2 = 


LDEXP (LOAD EXPONENT) 
170007 ss) 141377 127 


oe) ys MODE 


af 
 enavenett Eade eatesst ese tans aeathyeeauasaunsersseseeeess 


DATe: 
TSTe: 
FPIe: 


SCOPE 
BR TST2 
137777, 177777 
LOFPS #047417 
LDF DAT2. AC 
[DEXP s#000005,ACI 
STFPS FP 
CMP #047410, FPS 
BEO +4 
HLT 

TF 


Ac! ANS! 
CMP #191377, ANB! 
_+ 


CMP 8177777, ANS2 
+4 


;LORD FLOATING POINT STATUS 
; LOAD 137777, 7 INTO ACI 
OAD ab0008' INTO THE a+ gl OF AC 
STORE FLOATING POINT STATUS 
i CHECK FLO FLOATING POINT STATUS 


H_IF OK 
:FPS NOT EQUAL TO 047410 
Rone > Cea, euro ANS1,ANSe 


‘BRANCH IF OK 
SANSL- NOT EGUAL TO 141377 


; CHECK 2 
;BRANCH IF 0 
SANS? NOT ESUAL TO LP? 77? 


- Le 


om” eee 
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001440 


001506 
001510 
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001520 
01See 


104400 
00040e 
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TEST SECTION 
Steet 3. TEGT LDEXP (LOAD EXPONENT) FLOATING MODE 
: STL (LOAD EXPONENT FLOBT ING I 
177601 --) “ddd 0000 = =) 560200, 06 
FPS = 0474 of 2 AC = 
 eannennt eee ay Sh Sel Seo basashGats eeaveucaveneseaensersnsess 
SCOPE 
BR TST3 
oooooo DAT3: 000000, 000000 
047417 TST3: LDOFPS #047417 “LOAD FLOATING POINT STATUS 
177764 LOF DAT3, Ace “LOAD O00000, GO INTO AC2 
17760! FPI3: LDEXP  9#177601,AC2 ‘LOAD 177601 INTO THE EXPONENT OF ACZ 
STFPS FPS “STORE FLOATING POINT STA 
047400 CMP #047409, FPS * CHECK {FLOATING POINT STATUE 
BEQ +4 :BRANCH IF OK 
HLT “FPS MOT EQUAL TO O474O0 
177379 STF ace QNS1 ; STORE AC2 INTC ANSI,ANS2 
no0200 177362 CMP 8000200, ANS! CHECK ANS! 
BEQ +4 ‘BRANCH IF OK 
HL T+2 “ANSI NOT EQUAL TO COO200 
pococo 9177352 CMP w000000,ANS2 § ;CHECK ANS2 
BEQ +4 “BRANCH IF OK 
Hi T+2 -ANS2 NOT EQUAL TO O00000 
TEST W; TEST LDEXP (LOAD EXPONENT). FLOATING MODE 
EST LDEXP ‘LOAD EXPONENT) FLOATING 
; 900 77 — g0c000 900000 _ se) 077600,9 
 exuanat Ea cas SM, Selseebeeasttats lS caunravevavesensserseess 
SCOPE 
BR TST4 
ooo0c0 DAT4:  o00000,000000 
047417 TST4: LDFPS #047417 ;LOAD FLOATING POINT STATUS 
177764 LOF DATY, Ace -LOAD 000000,002000 INTO ACe2 
000177 FPI4: LDEXP #000177, Ace -LOAD 000177 "INTO THE EXPONENT OF ac2 
STFPS FPS ‘STORE FLOATING POINT STATUS 
947400 CMP #047400, FPS 3 CHECK FLOATING POINT STATUS 
BEG +4 ‘BRANCH IF OK 
HLT “FPS NOT EGUAL TO 047400 
1773Ge STF ANS! — ; STORE AC2 INTO ANSI ,ANS2 
077600 177274 CMP e560, ANS] ANS! 
BE9 : BRAN NCH IF OK 
HL T+2 “ANSI NOT EQUAL TO 077600 
000090 177264 CMP wOOCO00,ANS2 § ;CHECK ANS2 
: BEQ +4 “BRANCH IF OK 
Hi T+2 sANS2 NOT EQUAL TO. OOOCSC 
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MAL ce =11-DOFPK-8 TE T OF DEXP, STEXP MACYLL 27(732) O3-SEP-76 14:10 PAGE 13 
| OCFPK TEST SECTION 
 RREERSOHRERERRR ERE ERAS ERRNO EREDAR tihG he 
TEST S: TEST LDEXP EXPONENT), FLOATING MODE 
; 177777 <=) o40004 000020 ==) 037606, 000020 
FPS = SRC = Me-R AC = ACO 
errs Peers: Pere aren tea Pree ret it Se eretTT ett TT ert Terre 
001524 104400 SCOPE 
o01S26 og0402 BR TSTS 
901530 o4o000 occo20 DATS: o40000,000020 
991534 170127 047417 TSTS: LDFPS #047417 Sa FLOATING POINT STATUS 
1540 172467 177764 LOF DATS, Aco 3LOR 40000 000020 INTO ACO 
001544 176427 177777 FPIS: LDEXP  #177777,ACO 7 INTO THE EXPONENT OF ACO 
091550 170200 STFPS S ‘ETORE OAT ING POINT STATUS 
p01SS2 Oe2700 o47400 CMP #047400, FPS -CHECK FLOATING POINT STATUS 
001556 001401 BEQ +4 ‘BRANCH IF OK 
961560 104000 HLT “FPS NOT EQUAL TO 047400 
001562 174967 177214 STF ANS! — ;STORE ACO INTO ANS1,ANS2 
001566 622767 037600 177206 CMP a037600, ANS! : CHECK ANS 
01574 001"01 BEQ -BRANCH IF 0 
001576 i0400e HL T+2 : ANS 1 NOT EQUAL TO 037690 
001600 022767 O00020 177176 CMP wO00020,ANS2 § ;CHECK ANS2 
o0is06 o0:40! BEQ +4 ‘BRANCH IF OK 
001610 104092 Hi T+2 -ANS2 NOT EQUAL TO O00020 
eee ee eee ee eet TEP (LOGO EXPONENT), FLOATING KE SHEELEPSEHEFS 
b: TEST LDEXP {LOAD EXPONENT ) FLOATING MODE . 
177706 --) 125252 =) 1214 452, 125252 | 
: 7410 Eat” ac = Ac } 
aN En CO SEELFFFREFLEFLELLFLTESF 
o01612 104400 SCOPE | 
001614 900402 BR TST& | 
O016i6 125252 125252 DATE:  125252,125252 : 
No1e22 170127 047417 TST6: LDFPS #04:°417 ;LOAD FLOATING POINT STATUS | 
001626 172467 177764 P LDF H ACO “LOAD 125252, 125252 INTO ACO 
001632 176427 177796 FPI6: LDEXP 8177908, Aco *LOAD 177706 INTO THE EXPONENT OF ACO | 
091636 170200 STFPS *STORE FLOATING POINT STATUS | 
001646 622700 o47410 CMP #047410, FPS ; CHECK FLOATING POINT STATUS | 
1644 601491 BEQ +4 NCH IF OK | 
001646 104000 HLT FPS NOT EQUAL TO 047410 | 
001650 174067 177126 STF ACO ANS! ; STORE ACO INTO ANS! , ANSZ : 
001654 022767 121452 177120 CMP #i2l4S2,ANS1 § ;CHECK ANSI | 
001662 o01401 BEG +4 -BRANCH IF OK : 
001664 104002 Hl T+2 -ANS1 NOT EGUAL TO 121452 
MO1666 022767 125252 177110 CMP wicS252,ANS2 §;CHECK ANS2 
091674 90140} BEG +4 *BRANCH IF OK 
a6i676 1o4o0e Hi T+2 -ANS2 NOT EQUAL TO 125252 
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“>i. - eres 7g ENE, STENP | -MRCYDL 27.792) CO-SEP-76 itil Dee 1S 
sSERSEROLOSE COROT RET TT ETD LOAD EXO St: 44444 SCSFASSESHE CESSES HE EFH HOS 
Tes! 7: TEST EXP (LORD ExPu.>”. FLOATING “ULE 
: 300:38 --’ 963625, 0 peSeS 22 “Me? Jes, $2528 
rre> = 047406, cae 2 Me-R7, a a 
SSSSSSOSSSSSSHSSSSLHSEReE NSA RATeATT TET SYS aewkhOetaearaaae (oo 8 26486484998 
seivse 1OM4OU SCOPE 
ye 6UOMWeE gf TST? 
s-:7o8 8952525 oS2Se5 sate:  OS2525, 052525 
sorts 170127 =OM74I7 "St7:  LDFPS «8047417 LOAD FOB DING POINT STATUS. 
+ i726. tp. -- eo = = OR sy ast ; OAC oS2Se5 , 0Se5e$ o't i ane - eo -- 
Oi. 6 L7&b2: soei3s rr are DEX 9000.3°. Le oA 500} INTO ' EXE ONE’ J? Mee 
Jui? 170200 svTFeS FES STORE FLOATING POIN’ STAR'S 
O17 fee7oc 3=o47S800 _ Me gos7400 FFs -WECK FLOATING POINT STHTLS 
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je by O 27k? Os: 32 i a hf 325 aS. 4 HE CK ANS. 
OOl: 1401 Sts 7 o9 ;QRANCH TF J de tie 
99:7S2e 104%00Ce HL Tec “ANS NOT EGUAL '¥ “67 3z¢ 
ory 4 D227 eseses 17° ode “24 9222s. aNSe s CHECK ‘ 
ooi7b& Joi 42: | SBRANCH 2F OK ok 8 
3017584 ilusule ms -ANSE NOT EQUAL 'e 3s2525 
paneeanensanenegensensasnansoanonanessensensasensaseassseeseseeeeeeens 
SESS to: TEST QDEXP (LORE EXPONENT), FLOATING MOLE 
Snozoc --) 140825 125e5¢ ss) wages. 1g 1252 
FES = 1474:6, ie Ne-R7 5 1E38°¢ 
. FES = le, 110 
-SPPSPePESESEESOD® pk. LT si aloo 
OOi7EE pD440 ga 
JO1L77u oposle ~ ih 


901772 i404eS ie2SeSe PATIO: .* 


501776 170127 047417 TSTIC: Lists ae. {LORD FLOATING POINT STATUS. 

o2002 172467 177784 DAT; eG “Sap 190426,12S2S2 INTO ACO 
176427 00200 rerio: be ecgdecc.ace = sO Og020e' INTS THe EXPONENT OF ACO 

oCedlie 170200 STEPS PPS : TORE Et eo Ra: POINT STATLU 

Soe014 170ae7 177002 Src? = FEC EXCEPTION CODES 

Sc2020 Gee700 i47416 Pee BISTH1G,FPS CHECK FLOATING pSINT STATUS 

‘ece4 901491 feu i(iéiw‘ TBRANCH _IF 

Miece6 4104000 HL Pee NOT EQUAL TO iN741E 


992030 0e2767 O000iD i7&754 
were - 001491 
So2049 14000 


eozose2 022767 o0200b 176754 


+9 + Py AG 140! 


810, FEC -CHECK FLOATING EXCEPTION cOue 
_°4  SRANCH IF CK 
-FEC NOT EQUAL TO i0 


aFP 220, FER -CHECK FLOATING EXCEPTION ACOSESS 
, : BRANCH IF OK 
-FEm MOT EQUAL TO FRI. 
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TEST SECT! TON 


7=c > 


a’ ‘ee 
100025 


l2S25e 


OSOS0S 


leSeSc 
Ou 7417 


177764 
1776 An 


176714 


176704 


MACYL] 27(732) O3-SEP-76 i4:10 PAGE 1S 

STF Aco ANS! § ;STORE ACO INTO ANSI, ANS2 
CMP #1 dboes, ANS!  ;CHECK ANSI 

BEY H i Ok 

HL T+2 1 NOT EQUAL TO 100026 
CMP 8125252, ANS2 : CHECK nse 

“%; +4 ap. 

HLT+2 Neo NO SUAL TO 125252 


;ERESRERESERSSERESERESEAEELESSEESELES SESE ES SEES ESSE SEES EEE EE SESE S OOO 4 
FLOATING MODE 


TEST Ll: TEST LDEXP (LOAD EXPONENT ) 
: 177601 --> CSOS05, 0S ==> 990306, 050S05 
FPS = 047400 eae : or -R? ac = Ace 
 PEEEREREEERESERESSESEEEREEEESES SESE SESS SEE EEES SEES E444945545554404444844 
SCOPE 
BR TST) 
DATLI sarang 
TSTil: LDOFPS 80474 “LOAD FLOATING POINT STATUS 
LOF SATII. Ce -LOAD OSO0S0S,0S0S0S INTO AC2 
FPTil: LDEXP BAT ace -LOAD 17760) INTO THE EXPONENT OF At2 
STFES 3 TORE FL ING POINT STAT 
Mp #047400, Fes -CHECK FLOATING POINT STATUS 
O59 +4 :BRANCH IF OK 
HLT -FPS NOT EQUAL TO 047490 
STF ace, ANS! ; STORE AC2 INTO ANSI. ANS2 
CMP ecohsos.ansi :c K ANS! 
BEG 74 -BRANCH IF OK 
Hi Tse “ANS! NOT EQUAL TO 900205 
OME sOSOSOS,ANS2 § : CHECK ANS2 
BEG +4 ‘BRANCH IF OK 
Hi T+2 -ANS2 NOT EQUAL TO OSOSOS 
irreT is. TEST LDEXP (LOAD EXPONENT). FLOATING Moe 
TEST TEST LDEXP (LOAD EXPONENT), FLOATING MODE 
“hz7e00, — 040525, 125252 ==) 000125, 125252 
FPS = 147404, SRC = Me-R7, = ACO 


FEC = 12. FEA = FPI 12 
: EE PPSEESESEEESESESASEESEASREASERDSESESESESESPRESSSER ESE ESET EESEEEE ESTES 


- 


SCOPE 
BR TSTle 


OmTle: G40525, leSeSe 
TSTiz: LOFPS 8047417 _ ;LOAD FLOATING POINT STATUS. 
LOF AT12, aco :LOAD O4GS 3. 12585 YE 
FPIiz: LOEXP 8177600,Ac0 sLOAD 177600 HE EXPSNENT OF acc 
STFPS PS ;STORE FLOATING FOINT _° Tus 
sTs7 C : STORE EXCEPTION 
UMP BLS7HCS FPS :CHECK FLOATING POINT 57 ATS 


MAINOEC $1 1-DOFPA-8 TEST OF _LDEXP, STEXP  MACYLL 271732) O3-SEP-76 14:10 PAGE LE 
DCFPKE PLL TEST SECTION 
992230 09140) BEQ +4 «BRANCH IF OK 
OS2e32e 104900 Hi T -FPS NOT EQUAL TO 147404 
902234 oe2767 000012 i7e560 CMP eiz, FEC “CHECK FLOATING EXCEPTION CODE 
Juee4e 001401 seg +4 ; BRANCH a 
s5re44 104000 HiT “FEC NOT EQUAL TO 12 
O0e246 022767 O02212 178550 CMP eFPIl2, FEA 3 CHECK Ck FLOATING EXCEPTION ADDRESS 
Adees4 OO!40! SEO +4 
5f2es6 104000 HLT ‘Fea NNT EQUAL TO FPIi2 
002 174067 176516 STF aco ANS! sSTORE ACO INTO ANSI,ANSZ 
SGa264 Oee7er B0CleS 176510 =MP 0000125, ANS! -CHECK ANS] 
902272 90149: REQ -BRANCH IF OK 
992274 104002 HL T+2 “ANSI NOT EQUAL TO O00125 
992276 Oee76? 125252 178500 CMP el2S2S2,ANS2 § ;CHECK ANS2 
6022904 901401 8&9 +4 “BRANCH IF OK 
502306 104052 Hi T+2 -ANS2 NOT EQUAL TO 125252 
- SEFLELLSSLSSASSALSLASAASSLRESLELSSELELSLTSLELSSALFFLSATSF FA PA AP PASTAS AS 
“TEST 13: TEST LDEXP (LOAD EXPONENT) Dede MODE 
177875, = os6555,0Ss050S ==> 
FPS = 147400, SRC = mea? 
2 FEA = FPI13 
be ano Bh 6 OU ee 
902312 124400 SCOPE 
9023212 ocoo4de2 BE TST13 
992314 ososos oscsos pavi3: ososos,ososos 
902320 170127 047417 TST12: LDFPS #047417 -LOAD FLOATING POINT STATUS 
992304 172667 177764 ie DAT13, ACe -L OAD 050508 . 050508 INTO AC2 
092330 176627 177575 F2113: LDEXP 8177575, ace -' OAD 177575 INTO THE EXPONENT OF ACz 
902334 170200 STFPS FPS : STORE FLOATING POINT STATUS 
992336 170367 176460 STST = FEC RE EXCE PTION CODES 
SOes4e Oee7f0 147405 CMP #147400, FPS Ue CR LOATING POINT STATUS 
§02346 901401 ecg +4 “BRANCH IF OK 
902359 104000 HLT -FPS NOT EQUAL TO 147400 
o923S2 022767 OOoCle 178442 oMP wiz, FEC - CHECK FLOATING EXCEPTION CODE 
92360 00140) BEG +4 “BRANCH IF OK 
SCezte 104000 HLT -FEC NOT EQUAL TO le 
Of2264 922767 902220 176422 CMP eFPI13, FER » CHECK FLOATING EXCEPTION ADDRESS 
002372 001401 BEO +4 : BRANCH 
902274 194900 HLT -FEQ NOT FOUAL TO FPI13 
9023276 174267 176400 cugh STF ace ANS! - STORE ace INTO ANSI. ANSE 
Sfe40e fee767 077305 i7&27¢ emp 8977305, ANSi : CHECK ANS 1 
S02e410 OO140! BEG +4 _ +BRANCH IF OK 
502412 10400e Hi T+2 -ANS] NOT EQUAL TO O77305 
SD2si4 022767 OSCScS 17ezbz CMP #050 ISCS.ANS2  ;CHECK ANS2 
PSeee2 90142: BES “BRANCH IF Ok 


LL-DCFPA-8 "EST OF LOEXP, STEXP MACYIL 271732) O3-SEP-76 14:10 PAGE 17 
il TEST SECTION 
pcaea4 04002 HLT+2 -ANS2 NOT EQUAL TO OSOS0S 
See ener tesTahBee? ,sa98 EXPONENT), FUQRTING ROCESS 
000201 --> eS abe a5, ab268 <2 ibdees ieee if 
FPS = 046412, 
A 5 AJL. Bete: 
oc42s 6104400 SCOPE 
5*2432 6do04de BR TSTL4 
pope32 «140425 Letese DATI4: 140425, 125252 
002435 170127 o4640S TST14: LDFPS 8046405 ;LCAD FLOATING POINT STATUS | 
é > . Moe 
BSdes | 158200 evEDe | Pbe LOAD. OO0ey NT pie Be re 
902454 O22700 o46412 CMP #046412, FPS “CHECK FLOATING POINT STATUS | 
902460 001401 REQ +4 “BRANCH IF OK 
O5e46e 104000 HLT “EPS NOT EQUAL TO O46412 
002464 174067 176312 STF aco ANS! : STORE ACO INTO ANSI. ANSE 
002470 022767 100ee5 178204 CMP #100225, ANS: KA 
902476 oO0140: BEO +4  SREINCH IF OK 
592es00 1040de Hl 742 “ANSI NOT EQUAL TO 100225 
on2so2 o2e7e7 126252 176274 MP e12S252,ANS2  ;CHECK ANS2 
002510 05149: BEG +4 ‘BRANCH IF OK 
Scesie idsoce HL T+2 -YANS2 NOT EQUAL TC 125252 
s FEREFFFELSSERASLESLSLELALFLELELELELELERELEPALARERETALALELIFATTS SPATS SF S# 
-TEST 1S: TEST LDEXP (LOAD EXPONENT), FLOATING MODE 
: 177576 --) 040505, leSeSe ==> 900008, S000 
FPS = O4SHO4, SRC = MO-R7, AC = Ace 
° SSSSSSSESSSSLSSSSSTSSSSSLSSASESTESSLSASSSESSSSSSSRESAARESSRESAALSESSAAPPSPAASS 
902514 194400 SCOPE 
OcScis 00402 OR TSTI5 
co2s20 oa4os2s l25ece DATIS: o40S25, 125252 
902524 170127 045417 TSTIS: LDFPS  #04S417 sLOAD FLCATING POINT STATUS 
092530 172667 177764 LOF DATIS. ace ; LOAD 040525,125252 INTO Ace 
092534 176627 177576 FPIIS: LDEXP #177576,ACe 177576 INTO THE EXPONENT OF Ac2 
52540 170200 STEPS FPS ‘STORE FLOATING POINT STATUS 
no2542 022700 o¥sso4 CMP B04S454 FPS : CHECK FLOATING POINT STATUS 
902546 90140! BEQ +4 “BRANCH IF OK 
992550 104000 4,7 - FPS “NOT EQUAL TO CNS4O4 
noesSe 174267 176224 STF ace ANS!  ;STORE AC2 INTO ANS!.ANSZ 
N02556 fee7s7 OOCOOD 17621& CMP s000000,.ANS1 § :CHECK ANS! 
552564 001401 BE +4 ‘BRANCH IF Ok ; 
PS256— 1040Ce HL T+2 -ANSL NOT EQUAL TO OOCodS 
902570 022767 OCOCOD 17620e ME sCOOCOD.GNS2  ;CHECK ANS2 
AOSE7E «BSL: BEG +4 -BRANCK IF OK 
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HLT +2 ;ANS2 NOT EQUAL TO COOOOC 


DS? mee ante OS rp 0 mat 
TEST 16: EP (LOAD EXPONENT ) ede MODE 


; 177706 a, > oebES leSese = => 121452, 125252 
PS = 047410 5 

 csneunennsavabasnttianatedessotactbasveatanustianansansenssensnncassese 
SCOPE 
BR TSTIE 

DATIE: 125252, 125252 

TST16: LDFPS #047417 -LOAD FLOATING POINT STATUS 
LOF DATIE. ACO ‘LOAD 1252 L2Se5¢ INTO acd 
MOV #177706, Re :PU T EXBON NEN at 

FPT1S: LDEXP aco 1777 Re EXPONENT OF ACT 
STFPS TORE ORT ING. BoINt STATUS 


p 
s047410,FPS CHECK F “it POINT STATUS 
BEG +4 ; BRANCH 


HLT FPS NOT FOLIAL TO 047410 
STF ACO, ANS | +31 One ACO INTO ANS], ANSE 
VP #121452, ANS! 

BEQ +4 ‘BRANCH IF. “OK 

HLT+2 ANSI NOT EQUAL TO 121452 
CMP 812S2Se, ANSe ; CHECK 

BEG +4 :BRANCH IF OK 

HLT+e : ANS2 NO? EGUAL TO 12SeSe 


as i. eet LID hen teat), iain 


-TEST 17: TEST LDEXP (LOAD EXPONENT ay MODE 
; 000135 J ssebes ,05e5e5 = =) 067 326, S28 
FPS = 047400, SRC = MO-R3 Ac = AC a3 
FREER 1 NY eR ED. A Reet ee: 
SCOPE 
BR TST17 
CATI7: OS2eSe5, 052525 
TST17: LOFPS #047417 ;LOAD FLOATING POINT STATUS 
CDF DATI7. ace “OAD OS2Se5 s25¢5 INTO AC2 
MOV #000135, R2 BUT EXPONENT IN _ 
FPIi7: LDEXP R32 ace -LOAD OCO135 IN NTO” THE EXPONENT OF AC2 
STFPS :STORE FLOATING POINT STATUS 
CMP #047400, FPS ‘CHECK FLOATING POINT STAT JS 
BEG +4 -BRANCH IF OK 
HLT -FPS NOT EQUAL TO QY74OD 
T Ac2,___ ANS! = ©—«_: STORE aCe INTO ANS! ANS2 
CMP 8067325, ANS! CHECK ANS] 
SEG + : BRANCH IF Qk P 
H_T+2 -ANS] NOT EGUAL TO O&TS=S 
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MACY1! 27(732) O3-SEP-76 14:19 PAGE 19 


CrP s0S2525, ANSE - CHECK ANSE 
_+ 
HL T+2 i BRANC Not EG EQUAL TO OS2S25 
FLASHER LERERA ESE SRAASRAALE REALL RALAFSELELASELASELAL AALS ALLL AS FFAS ASA SS 
“TEST 20: TEST STEXP (STORE EXPONENT), FLOATING MODE 
; 990000 00000 --> 17760 
: pS = 047410, FCC = AC = ACO, OST = M&-R7 
 neccconececcencnnehaccescesnenhesennccesesessabosensonssessecsnesesees 
SCOPE 
BR TST20 
paT20: 990000, 000000 
TST20: LDOFPS #047 -LOAD FLOATING POINT STATUS 
F pare0, ACD 3. 08D Re The EIPOHEN 09 INTO ACO 
Feroo: STEXP OF ACD IN ANS 
MOV ape ANS? 2a CPU 
IC 8177760, ANS : SAVE ABNSTT TIOR CODES 
STFPS FPS STORE FLOATING POINT STATUS 
CMP 8047410, FPS “CHECK FLOATING POINT STATUS 
BEQ +4 : BRANCH K 
Hi T “FPS NOT EQUAL TO 047410 
CMP 8177600,ANS1 § ;CHECK ANS! 
SEG +4 ‘BRANCH IF OK 
Mi T+] “ANS! NOT EQUAL TO 177620 
CMP 810, ANS2  ;CHECK AN 
BEG +4 -BRANCH IF OK 
HL T+2 -WRONG CONDITION CODES! 


- SELESEFSSHESSASFLAA SSAA ELEAF EALELLELLELARLLAATFFEREFSLATIAEFIAA TAT LPASS 


:TEST 21: TEST 
140134, 034343 --> 
: FPS = O47 


STEXP (STORE EXPONENT), 
ea 


FLOATING MODE 


ST = M&-R? 


AC = ACe 
 ssnnanenntenatoncbolonenskonnnlonsountensensnnstenusorseusonssaseneet 


FCC = 
SCOPE 
BR TSTel 
DAT21: 140134, 034343 
TST2]1: LDFPS s047417 
engeee ACe 


ANS] 
MOY ape ANSe 


C #177760, ANSe 
STEPS FPS 
cmp 8047404 FPS 
SEG +4 
HLT 


CMP s0COQ00 NS! 
_ +4 


“LOAD FLOATING POINT STATUS 
‘LOAD 140134 034343 INTO Ace 
STORE THE EXPONENT OF AC2 IN ANS: 


: STORE FLOATING POINT aie 
ENC 6 POINT ST 
:FPS NOT EQUAL TO O474O4 


-CHECK ANS] 
“BRANCH IF OK 
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170127 


ynAr 


www 


090094 


leSeSe 


plats 


047490 


Oco0ci 


052525 
047417 


177760 
O47400 


-4- 
rrvery 
wen 
-4-4 
uicv 
mir 
o> 
a 
-«t_) 
arm 
i ae 


17S63e2 


175574 
175566 


175544 


175534 


17S47€ 
175470 


XP, STEX® 


MACYI1 27(732) 


HLT+1 
CMP 
BEQ 


HLT +2 


a4 ANSe 


+4 


03-SEP-76 


14:10 PAGE 20 


;ANS1 NOT EQUAL TO OO0COO 


; CHECK a 
‘BRANCH IF OK 
‘WRONG CONDITION CODES! 


ST ecT oD, TEGT GTEXP (STORE EXPONENT) FLOATING ME 


DAT2e: 
TSTee: 
FET Ze: 


TEST STEXP (STORE EXPONENT), 
640200 TeSeSe --) 00000! 


FPS = 047400, FCC = 
 sunpannnabncasenqusbuansasceasbossanscessenvesthonsaeossterenssceseeses 


SCOPE 
ge TST22 
040200, 125252 
LDFPS #0474 
OF patz2, ” aco 
STEXP NS1 
OV WPS ANS2 
BIC ars, ANSe 
STFPS 
CMP 8047409, FPS 
BEG +4 
HiT 
CMP #000091, ANS! 
BEG +4 
KLT+1 
CMP #0 ANSe 
BEG +4 
Hi T+2 


FLOATING MODE 


AC = ACS, OST = ME-R7 


:LOAD FLOATING POINT STATUS 
LOAD 040200 lesese INTO ACO 
S10Re. 1 THE EXPONENT OF ACD 


STATUS 
: SAVE SONBITION N CODES 
: STORE tele POINT STATUS 
;CHECK FLOATING POINT STATUS 


:8 H IF OK 
:FPS NOT EQUAL TO 947400 


IN ANS: 


CHECK ANS] 
*BRANCH IF OK 
-ANS] NOT EQUAL TO 90000! 


;CHECK ANS2 
BRANCH IF OK 
;WRONG CONDITION CODES! 


rey Ba. TERT GIEW? (TORE EXOOENT) FLiatic 


FCC = 


ed: TEST STEXP (STORE EXPONENT), 
42625, OSe526 on) a 


FLOATING MODE 


OsT = ME-R7 


AC = 
 saunenspabusalosetbbacsebinnsbhennnsasesbencestionsnennttecsastenonneet 


PATe3: 
TST23: 
FPI23: 


SCOPE 
BR 


TSTe3 


042525, 052525 


LOFPS 


8047417 
DAT23, ACO 
ACO m 


aaP ANS2 
#177760, ANSe 
#047400 FPS 
+4 


;LOAD FLOATING POINT STATUS 


U ST 
‘SAVE CONDITION CODES 
:STORE FLOATING POINT sratus 
:CHECK FLOATING POINT STRTUS 
:BRANCH IF OK 
:FPS NOT EQUAL TO O4THCD 


MAINOEC-11-DCFPK-8 teal ee th STEXP MACY11 27(732) O3-SEP-76 14:10 PAGE el 
OCPPKB. P11 T SECTI 


002326 022767 200012 175446 CMP w000012,ANS1 § ;CHECK ANSI 
902334 001401 BEQ +4 -BRANCH IF OK 
693336 104001 HL T+1 “ANSI NOT EQUAL TO COOOle2 
003340 922767 00000 175436 CMP #0, ANS2 ; CHECK ANS2 
33346 00140! BEQ +4 ‘BRANCH IF OK 
fetes 104002 Hi T+2 tWRONG CONDITION CODES! 
Ee ee eee eT STEXP (STORE EXPONENT), FLOATING MOE 
-TEST 2 STEXP (STORE EXPONENT}, FLOATING MODE 
: “1gsese geese --) d Ae? eS f 
by AC = Ace, OST = ME-F 
 assugusmnabenesensnsbenneuinesaatausansagneneprabanonasnssonssensesseees 
092352 104400 SCOPE 
953254 00402 BR TST24 
003356 leSese 125252 pat24: 125252, 125252 
993362 170127 047417 TST24: LDOFPS #047417 -LOAD FLOATING POINT STATUS 
003366 172667 177764 LOF DAT24, Ace ‘LOAD 125252, 125252 INTO AC2 
003372 175267 i75404 FPID4: STEXP AC2 ANS! § :STORE THE EXPONENT OF ACZ IN ANS! 
003376 013767 177776 175400 MOV asP5.  ANSe :GET CPU STATUS 
003404 042767 177762 17537 BIC #177769,ANSe  :SAVE CONDITION CODES 
9os4i2 170200 STEPS FPS STORE FLOATING POINT STATUS 
003414 622700 o47410 CMP #047410, FPS “CHECK FLOATING POINT STATUS 
003420 001401 BEG +4 -BRANCH IF OK 
p03422 194000 HLT -FPS NOT EQUAL TO O47410 
003424 022767 177725 175350 CMP #177725, ANS1 CHECK ANSI 
003432 001491 BEG +4 “BRANCH IF OK 
003434 104001 HL T+} *ANSI NOT EQUGL TO 177725 
002436 Oe2767 opooIc 175340 CMP #19, ANS2 § ;CHECK ANS2 
603444 O01401 BEG +4 -BRANCH IF OK 
no244—6 104002 Hi T+2 =WRONG CONDITION CODES! 
s LELEERAALE SELLE S RELL LS RELL LLAAALESARELALELELALALELELELETRELLAT FRET AE? 
-TEST 25: TEST STEXP (STORE EXPONENT), FLOATING MODE 
O52525, 05e625 --) 90005¢ 
= §47400, ce = O00, Ac = ACO, OST = M&-R7 
 pnuncendecencensnesdecasccnseessecoeecascecessosesnesusnaseaesaoseenses 
902450 104400 SCOPE 
o0s452 o0040e BR TST2s 
003454 oS252e5 csS2s25 paves: ome es, 
PO34E0 170127 047417 TST25: LOFPS #047 ;LOAD FLOATING POINT STATUS 
SQ2464 172467 177764 LOF RAT OS. ” aco LOAD aSe5e 052525 INTO ACO 
993470 175067 175306 FPI2S: STEXP Aco aNS! STORET HE EX ONENT T OF ACD IN ANS! 
DO3474 013767 177776 175202 MOV J#PS NS GET C py Stat 
002602 042767 177760 175274 BIC ade 0. an -SAVE C TFTOR CODES 
003510 170200 STFPS = FPS -STORE FLOATING POINT STATUS 


O03Sie Oee700 947490 CMP 8047400 FPS ;CHECK F QOATING POINT STATUS 
JO351& OO14C) BEG +4 :BRANCH IF OK 


| Bh 5 | ace 


CFPKE.P 


083520 
003See 
oO 


03530 
00353e 


ake 


C3544 


003642 


003544 
OCSE4E 


O0C3650 


003704 


104000 
022767 


001401 
104001 


B5TS8i 


104002 


104409 ~ 


060402 


104400 
000402 


000200 
170127 


17020S 


TEST OF LDEXP, STEXP 
TEST SECTION 


O000Se 17S2Se 


000300 


177777 
047417 
177764 
175210 
177776 
177760 
047400 
000177 


009800 


COOcd0 


17Se4e 


175204 
175176 


175154 


175144 


MACY11 27(732) 


HLT 

CMP #0000S2,ANS1 

BEQ . +4 

HLT+] 

MP #00, ANS2 
+4 


EG 
HLT+2 


O3-SEP-76 14:10 PAGE 22 


sFPS NOT EQUAL TO 947400 


;CHECK ANS 
‘BRANCH IF OK 
‘ANSI NOT EQUAL TO O000S2 


i BRANCH TP’ OK 


;WRONG CONDITION CODES! 


22 Sao peat ttt jah bt tet aed bdo iat bal thd tl ade ah 4d 4 tefl + alll 


TEXP (STORE EXPONENT), 
177777 7/707 =) weg 


FLOATING MODE 
DST = M6-R7 


ACs 
 ennennnausaneucenasboensscecnsehnccconcssecencebooneeceessnsecsessseses 


DATeE: 
TSTeb: 
FPI26: 


° 
. 
* 
. 


FpS = 047400, FCC = 

SCOPE 

BR TST26 

177777, 177777 

LDFPS #047417 
DAT2b, Ac3 

STEXP AC3 ANS! 


MOV a#PS.  ANSe 
BIC #177760, ANS 


CMP #947400 ,FPS 
+4 

CMP #000177, ANSI 
+4 


CMP #00, ANS2 
. +4 


999200 ggg --) 177 
= Ag74 F 


:GET CPU STATUS 


-LOAD FLOATING POINT STATUS 
; LOAD 177777.177777 INTO ACS 
RE THE EXPONENT OF AC3 IN ANS! 


;SAVE CONDITION CODES 

sSTORE FLOATING POINT STATUS 
;CHECK FLOATING POINT STATUS 
BRANCH _IF OK 

:FPS NOT EQUAL TO 047400 


; CHECK i 
;BRANCH IF OK 
SANS NOT EQUAL TO 000177 


;CHECK ANS2 
;sBRANCH IF OK 
;WRONG CONDITION CODES! 


5 LEKERL EEL ERA ELLE LENE EK ESLER EEE AL EEL EES EAL EEL ERE RR ELL EE EAL RLRELERERRER 
27: TEST STEXP 77oh EXPONENT), 


FLOATING MODE 
= Mb-R7 


= RC zs OST 
 ccgupenntensinankiiaunnbton ti teunassonionssitiennsatebhensatonausens 


DAT27: 
TSTe?7: 
FPI27: 


SCOPE 
BR TST27 


000200 , 000000 

LDOFPS #047417 

OF DAT2e7, ACI 
STEXP ACI ANS] 
MOV a aP , ANS2 
BIC #177760, ANSe 
STFPS FPS 


:LOAD FLOATING POINT STATUS 

LOAD 090200 000900 INTO ACL 

: STORE EXPONENT OF AC! rN ANS! 
-GET CPU y STATUS 

: SAVE CONBIT ION CODES 

‘STORE FLOATING POINT STATUS 


——_—«—- —_- ——_-—— ~— <—<— =e 


2m _—— ee a Ee RE tee 0 me ee ee me 


Bos ao | Relat 


Bbacis§ OBT401 
003714 104000 


_ OCFPKB.P 


003716 
003724 
003726 
003730 
993736 
603749 


003742 
003744 
003746 


pOueLe 
004024 
004026 
904030 


004036 
004040 


Oo40%e2 
OO4044 


022767 
001401 
104001 


022767 


001401 
104092 


104400 
000402 
125252 


170127 
172767 


175301 
013767 
042767 
010167 

1401 
104000 
ath 
104001 
022767 
001401 
104002 


104400 
00040e 


OSeS25 
170127 


172667 
175204 


TEST OF 


047410 


177601 


000510 


leSeSe 


047417 
177764 


177776 
177760 
174776 


047410 


177725 


000010 


052525 


047417 
177764 


DEXP, STEXP 
TEST SECTION 


175056 


175046 


17501e 
175004 


174756 


174746 


DAT3O: 
TST30: 


MACY1i 27(732) 


B 
HLT+2 


8047410,FPS 
+4 
#177601,ANS1 
+4 


#id, ANSe 
. +4 


SCOPE 

BR TST30 
125252, 125252 

LDFPS #047417 

LDF DAT30, ACc3 
STEXP AC3 RI 
MOV asPS, ANS2 
BIC #8177760, ANS 
MOV RI ANS! 
SIEPS FPS 

MP 8047410,FPS 
BEQ +4 
HLT 
CMP #177725, ANS1 
BEG +4 
HLT+1 
CMP #10, ANS2 
BEQ +4 
HL T+ 


— ~_- — ee ee ea ———_ - _—— _—— fae ae +e OO ee eee 
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EAE if YpPTIN POINT STATUS 
-FPS NOT EQUAL TO 047410 
sCHECK ANS] 

“BRANCH IF OK 

*ANS1 NOT EQUAL TO 177661 
*CHECK ANS2 


‘BRANCH IF OK 
*>WRONG CONDITION CODES! 


SL alae Sah bated bh leh delsh5-1-4-5 ded iyh-b del heh helalel-in-4-S-i-tehlalsh-4-t-lelelalelalelelelelelelelele 
T TEST STEXP (STORE EXPONENT), 
lesese searae > 1 a 


AC = ACS, 
 enumemanptenukanstabannabtuonttionnsennnkenentinmmasatian nekeaiente 


FLOATING MODE 
DST = MO-R1 


;LOAD FLOATING POINT STATUS 


Wp pe niger Wich n 


oR TYE NG 
Sum a it At sats 
‘FPS NOT "EQUAL TO 047410 


;CHECK ANS] 
sBRANCH IF OK 
;ANS1 NOT EQUAL TO 177725 


;CHECK ANS2 
;BRANCH IF OK 
;WRONG CONDITION CODES! 


s EXLLLLELLELELALELALE LL LLL LLEL LALLA LLLALELLALE LALLA AAELERLAAAALAATALALEE 


31: TEST STEXP (STORE EXPONENT), 
0525 SS GRR --) qoUOss 


FLOATING MODE 


AC = DST = MO-R4 
 snaucunnecanscasersbuseastesrthenssesussansssshucunceesteentesascentee 


DAT31: 
TST3l1: 


SCOPE 
BR 


TST31 


052525 , 052525 


LOFPS 
LDF 
STEXP 


8047417 
D 


AT31, AC2 
RY 


ACe, 


;LOAD FLOATING POINT STATUS 
sLOAD OS2S25,0S2525 INTO Ace 
STORE THE EXPONENT OF AC2 IN RY 


-— ere wee we ee 


: Bs 5 fail 


| DCFPKB 


male 


004114 


004116 
004124 
004126 
004130 


004135 
094140 


004142 
004144 


004260 


re 


104000 
022767 


104001 
00148 


10408e 


104460 
000402 
143125 
170127 


016767 
022767 
001401 
104901 


022767 
001401 
104082 


TEST OF LDEXP, STEXP 
TEST SECTION 


17777 
es 


047400 
0000Se 


600000 


052525 
047417 


177764 
00000e 


177776 
177760 


047400 


177734 
000014 


060000 


ata 


174704 


174656 


174646 


174574 
174566 


174544 
174536 


174526 


—_—— en mm — = «= -oe -——_—. - —_—————  —-—— ~ 


MACY11 27(732) 


——— a ee ee ee ee ee em ee er ee a 
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T CPU STATUS 

Sve. COB] 10 CO ODES 
RE FL OAT ING 6 POT NT : StATU 

ek COATING POINT STATU 

‘FPS NOT EQUAL TO 047400 


i BRANCH TP OK 


SANS NO EQUAL TO O000Se 


; CHECK win 
*BRANCH IF OK 
sWRONG CONDITION CODES! 


5 EEK ERE EEE R EERE EEE EE ERE LEE LEER E EERE LAER EEE EEE EE LERE EE EEE LESS 
Je: TEST “=” go00y EXPONENT), 


FLOATING MODE 
DST = Me-R7 


AC = 
 pspnennonasecesnensebonsnctnsnsabacnnennesancnsebuqnnenersncscescanqvese 


MOV 
BIC al77P60, Nes 
MOV 
$.,PS am 
CMP #047400, FPS 
BEQ +4 
HLT 
CMP #000052, ANS! 
BEQ +4 
HLT+1 
CMP #00, ANS2 
BEG +4 
HLT+2 
; 143125, 052525 --> 
S = 647400 
SCOPE 
QR TST32 
DAT32: 143125,052S25 
TST32: LDOFPS #047417 
LOF DAT32, aco 
CLR ANR32 
FPI32: STEXP Acc, (PC) + 
ANR3e: O 
ah +10 
HALT 
HALT 
HALT 
MOV aePS, ANS2 
BIC 8177760, ANS 
STFPS 
CMP #047400, FPS 
BEQ +4 
HLT 
MOV ANR32, ANSI 
CMP #00014, ANS! 
BEG 
HLT+] 
CMP #0 ANS2 
BEG +4 
Hi T+2 


;sLOAD FLOATING POINT STATUS 
sLOAD 143125,0S25eS INTO ACO 


;STORE THE EXPONENT OF ACO IN .+2 
: THE EXPONENT GOES HERE 


;GET CPU STAT io 
; SAVE CONDITION CODE 

:STORE FLOATING POINT STATUS 
: CHECK FLOATING POINT STATUS 
BRANCH IF OK 

-FPS NOT EQUAL TO 047400 


;CHECK ANS] 
;BRANCH IF OK 
ANS! NOT EQUAL TO 000014 


;CHECK ANS2 
;BRANCH IF OK 
;WRONG CONDITION CODES! 


er aan TEST RID® (ATORE D@OMENT) FLOATIMG RE 


. 
9 
. 
, 
o 
4 


= H47410. 


33: TEST STEXP saree EXPONENT), FLOATING MODE 
paces S, 1e5eSe oe nA a 
eS > 


AC = wCl, DST = M2-R7 


———_— or eT wee 


mee = - 


| MAINDEC~ oo 


 DCFPKB.® 


004262 
OC i264 


104400 
0004Ge 
032615 


17Cie? 
172567 


022767 
001491 
104602 


LO4No4 


TEST OF 
TEST SECTIO 


12S2Se2 


047417 
177764 
UC00Ce 


177776 
177768 
0474i0 


177734 
1777S3 


C0010 


125252 


047617 
177760 
060000 


047600 


174332 
04005e 


LDEXP, STEXP 


174454 
174446 


i74424 
174415 


174406 


12eS2Se 


174324 


= —— ee a ee eee — ee ee ee ee ee eee ee ee ee ee 
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» SLLARE LAER AA RALA RL ALA SAA LALALALA LALA LA LERARELALAFERELALALLLLLLLALLLELESSF 


DAT33: 
TST33: 


FPI33: 
ANR33: 


SCOPE 

BR TS733 

032615, 125252 

LOFPS #047417 sb 00 FLOATING POINT, STATUS 
LDE DATS, ACL ;LOAD 032615, 125252 INTO ACI 
STEXP ACL,  (PC)+  ;STORE THE EXPONENT OF ACI IN .+2 
‘THE EXPONENT GOES HERE 

Ba .+10 

HALT 

HALT 

HALT 

MOV  3aPS, ANS2  ;GET_CPU STATUS 

BIC _ 8177?60,ANSE — ;SAVE CONDITION CODES 

STFPS FPS :STORE FLOATING POINT STATUS 
cue #047410, FPS ‘CHECK FLOQTING POINT STATUS 


;BRANCH Ir OK 
HLT FPS NOT EQUAL TO O47410 


MOV ANR33, ANS! 
CMP #177753, ANS! sCHECK ANSI 
BEQ ‘BRANCH IF OK 


HLT+1 sANSL NOT EQUAL TO 177753 
MP #10, ANS2 ; CHECK Sasa 

SEQ +4 sBRANCH IF OK 

HLT+2 sWRONG CONDITION CODES! 


eet ade TEST LDEXP (LOAD EXPONENT) DOUBLE MODE 


(LOAD EXPONENT 


EXP LE MODE 
090009 -=> gWeSE, LESESs » 125252, iebobe = => 0400S2, 1252Se, leS2Se, l25e5e 


F 4 
POET LET PTT PETE PT EET TT DUET ET TET TET ENOL ETE ET EET TTT ET TTT ETT STT 


DATS: 


TST34: 
FPIS4: 


SCOPE 
BR TST34 


040252, 125252, 12eS2Se2, leSeSe 


LOFPS #047617 iL RB FLOATING POINT STATUS 
LDD DAT34, aco AD 040252, 125252, 125252 Lesese INTO ACO 
LDEXP s#co0000,ACO ‘TOAD 000000 INTO THE E xPO fen T OF ACO 
STFPS FPS ‘STORE FLOATING POINT ae 
CMP 8047600,FPS -CHECK FLOATING POINT ST ATHe 
BEQ +4 :BR F OK 
7 -FPS NOT EQUAL TO 047600 
STD aco ANS!  ;STORE ACO INTO ANSI THRU ANS4 
CMP wO4G0S2,ANS!  :CHECK ANSI 
GEO +4 ‘BRANCH IF OK 
Hi T+4 ‘ANS! NOT EQUAL TO O4O0Se2 


— re ee ee ee ee 


ee NE ee RE EE ES ES EE RE EE REE Ste ee me me 


| MAINDEC-11-DCFPK-8 
 DCFPKE. Pil 


Bose§ S040 


p04474 
po4she 
004504 


004516 


0046 le 
004620 
004622 


OOYES4 
004632 
OO4634 


cata 
i404 


1O4004 


104004 


—_—-—=— ~~ _- —_—— ES ee — —< ——_ 7 


TEST OF LDEXP, STEXP 


TEST SECTION 


12S2Se 
l2S2eSe 


125eSe2 


177777 
047817 
177760 
000085 
047610 


174234 
141377 


177777 
177777 


177777 


174314 


174304 


174274 


177777 


174206 
174176 
174165 


174156 


—— =m ee o_O re ee ee ee ee ee ee Re EE RE EE ee oe 
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MP #125252, ANSe if CK ANS2 
+4 


EQ ; H IF OK 
HLT +4 sANS2 NOT EQUAL TO i2SeSe 
CMP #125252, ANS ; CHECK - 
ory . +4 : BRANCH P eon 
HLT +4 ‘ANS NOT EQUAL TO 125252 
CMP #l2eSe5e , ANS4 sCHECK ANS4 
BEQ +4 ;BRANCH IF OK 
HLT +4 sANS4 NOT EGUAL TO leSeSe 


s FELREREALE ERLE REALE AERA LALLA AE RRKE LEE LRRAELALL A RARE LELAAALRERERELELELES 


-TEST 35: TEST _LOEXP (LOAD EXPONENT}, DOUBLE MODE 
QO000S <=? 437777 17 77777, i?777?, 1777 77 ==) 141377,177777,177777, 177777 
ennuent ES hea Sal Skanes debe rcaannseseneonenceonsen 
SCOPE 
BR TST3S 
DAT3S: 137777,177777, 177777, 177777 
TST3S: LDOFPS #047617 LOAD FLOAT Ns SOINT STATUS 
DD DAT3S, aAc3 LO OAD 1 177777, 177777 INTO AC3 
FPI3S: LDEXP  #00008S,AC3 -L0 af ATO The EXPONENT OF AC3 
STFPS FPS : STORE poogs iN POINT STA 
CMP #047610,FPS ; CHECK FLOATING POINT STATE 
BEQ +4 :BRANCH IF OK 
HiT -FPS NOT EQUAL TO 547610 
STD AC3 ANS! ; STORE ac3 INTO ANS! THRU ANS4 
CMP #141377, ANS! ANS! 
EG t BRANCH IF Ok 
HL T+4 -ANS1 NOT EQUAL TO 141377 


CMP #177777,ANS2  ;CHECK 

+4 : BRANCH 1 OK 
SANS2 NOT EQUAL TO 177777 
CMP #177777,ANS3 CHECK. ANS 


BEQ ‘BRANCH IF OK 

HL T+ sANS3 NOT EQUAL TO 177777 
CMP 8177777,ANSH CHECK ANSH 

BEQ +4 * BRANCH IF 0 

HiT+4 :ANSY NO EQUAL TO 177777 


[cep eeeeeneee ire nies teeam, tame ae 
“TEST 36: TEST LDEXP (LOAD EXPONENT), DOUBLE MODE 

: 177601 =) 061616, 143434, D528e5, 107070 = => 000216, 143434, 052525, 107070 
47600, SRC = M2-R7, AC 


Pia ED 3 A eR 


oe mee eer -— ewww ee oe ——- 





“oe, ome + ee .. ee 
Fewes- = SbosSs -..lCté«+TSTR 
TISb4E DELETE S343 TS2E2E TATE: Db1E1b, 149454, OS252S, 207070 
~_=- cht ou’ w& co 
= + ee 7enrme 5° ~™w7%%:7 re? “m ews go 717 2! 70n Ci AAT Tur a ag ps! @@ee - 
oe “656 ivebd- o/s Se a ee’ vn i 3S MLE obs VS Pat inte ,0707¢0 anit a 2 
Sovebs  ivbber 17760: Fer3e:  LPEXP 8 77801,ACE AG 177604 ste g Eau OF Ate 
a i70e00 STFPS 6 FPS “ SSTORE FLOATING POINT S767US 
oo4670 Yee700 OYPECL MP 8047600 ,FFS ; CHECK gt ae BON, STmTUS 
Sove7S §=90140) BES + “§ & peter, 
504676 154000 HL “FBS NO? EQUAL TO 247E0C 
SOM70C i74267 L74C7S STC aCZ, ANS : STORE aCe INTC GNS! "SRL ANS- 
oos7 OS 522767 Celt ic Yi a, 5 Sool it ° ANS: ° - AME CK 
S712 O01801 SE 3 4 : BRANCH Bi OK ts 
308714 1Os00s nL 4 “ANS! NC EQUAL °S SOCzLE 
90471 gee78? 143836 I 7S2E2 “Mp 8142424. 4NS2 9; CHECK ANSZ 
504724 901401 SE +4 i SRRNCH TF 
304726 1D400s "ee "ANS2 NOT EQUAL “2 193425 
O04730 ocee7&7 DSe52 174050 “Mp e052525,ANS2 ;CHECK ANS3 
504736 001401 SE 3 + : HIF OK 
Ses74o «1 o400s “ae. “ANS3 NOT EQUAL T2 OSeS2¢ 
NON74e OSS7E7 ITTOTS L744 “Mp 81C7070,ANS4 =; CHECK ANSY 
Se ises SRT SP: Seo Cti“‘«‘ REN iF Ox 
504752 104004 ML T+ TANS NOT FE SUAL TO 107072 
peneeseqeneeunsegeesenpsel eT aati ee 
-TEST 37: TEST LDEXP (LORD EXPONENT DOUBLE | MODE hat 
:; 000177 --> 161616 isieis. 161618, ipleie = =) 1771S, 161818, 161518, 2816.5 
FeS = 047610. SRC = Me-R7 AC = 
 cccsoenastatenctprbonenetesccsesohesssscocceseoncosssoocenecooesoseees 
NOS7S4 104400 SCOPE 
S0s75— 00404 5R 1S737 
SO4760 IG1616 181618 16:6: DAT37: 161616,161616, 161616, 161616 
COM766 «LELElE 
904770 170127 SY7&i7 7ST37: LDFPS #047617 -LOAD FLOATING POINT STATUS ae 
004774 172567 177760 LOO DATS “LOAD i616! 181616 161616, 161615 INTO ACL 
foso0c 176527 900177 rersr: Coexe acpbit7, Al “LOAD 000177 INTO THE EXPONENT OF Ac: 
005004 170200 a STFPS ‘STORE FLOATING POINT STATUS 
922700 o47@.C MP 0057610, FPS :CHECK FLOATING POINT STATUS 
S012 901401 BEG “BRANCH IF OK 
0 HLT “FPS NOT EQUAL TO C47E19 
O9S016 174167 172760 STD ACL, ANS! — ;STORE ACL INTO ANS! THRU ANS 
=e 022767 177616 172782 *éP ai? G16,ANS: § ;CHECK ANS] _ 
ecs030 001401 BES -GRANCH IF OK 
Sretze 104004 Hi To4 “ANS! NOT EQUAL TO 17TELE 





od 


OOSC%G 
SOSOS4 
OOSOSE 


in Pik GAA 
ree 2ne hon Sedo? RSPeweF Bot 


209059 
aR 
uw 
WLIe-= ba 


t 


arvany ot 


cw) 
«woo 


" 


— 


TEST OF + 
SECTIO 


Test 
161616 


a 
161615 


161616 


OS0620 


047617 
177760 
1777 f¢ 


047600 


O606e8 
O80C25 


Annse 
ococet 


173742 


173732 


173/ee 


i73634 


173624 


vENP STEXP 


MACYI1 27(732) 


8i61616,ANS3 
+4 


#161616,ANS4 
+4 
HLT +4 


-PESEPELRLESESESSESS SRE SELES 
-TEST 40: 


3 177777 ==) 949000, 000020 


FPS = 047600, SAC 
: $EESSSESEREEEEESEEEEEESESSS 


SCOPE 
SR TST4O 
DAT#O: O40000, 900020, 00020, 


TST4O: LODFPS 17 
tees aOR aco 
FPI4C: LDEXP 8177777, ace 


2057600, FPS 
. +4 


ANS! 
CMP n63P600, ANS! 


#000020, ANS2 
+4 
#090020, ANS3 
+4 


#000020, ANS4 
+4 


TEST LDEXP (LOAD EXPONENT) 
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;CHECK ANS2 
;BRANCH IF OK 
sANSe NOT EQUAL TO 161616 


K ANS3 
: BRANCH IF_ OK 
;ANS3 NOT EQUAL TO 16161 


;CHECK ANSY 
;BRANCK IF OK 
;ANS4 NOT EQUAL TO 1E1616 


RKEFSFLFLLFLASLASLLLAAESLALESSSLASSSS ALE 444444 
DOUBLE MOD 
99000, 090029 == 


aa 


E 
=> 037600, 000020, C00020 , Coctz2 


$455EESEEEES SEES SESS 455495545055059505505085 


oocces 
+L Bao pagod, conbe0 060 Geb g002e ITD ACD 
“LOAD 177777 HE EXPOMENT < OF aC2 


‘STORE FLOAT ING. BOINT Etat 
s CHECK FLOATING POINT eraTus 


NCH _IF OK 
FPS NOT EQUAL TO 047600 


STORE ACO INTO ANSL THRU 
:CHECK ANS! 

SBRANCH IF OK : 
SANSL NOT EQUAL TO 027600 


- CHECK ANS2 
“BRANCH IF OK 
-ANS2 NOT EQUAL TO 


; CHECK ANS3 
-BRANCH IF O 
-ANS3 NOT EQUAL Td 
- CHECK s 4 


BRANCH IF OK 
sANS4Y NOT EQUAL TO 000020 


ANS’ 


AAzASPS 


wdihed ed ed he bes 


FAAAS* 


hh hd 


ata. Geet Eee ti ian OG Ge oe 


;TEST 41: TEST LDEXP (LOAD EXPONENT), DOUBLE MODE page 
177706 =>) , peseSe, leSese, lesese, ,eb2te g.2=) lel462, 125252, 125282, 125272 


$ 
FOC a BO SR 3 OL | 


SCOPE 


JUS3eé 


n0s322 
OOS340 


194400 
600405 


082525 
CSeSes 


170127 
172667 


104900 
Ves 


TEST OF _LDEXP, STEXP © MACYI1 27(732) O3-SEP-76 14:10 PAGE 29 
TES’ SECTION 
BR TSTY] 
125252 128252 DATH!: 125252, 125252, 125252, 125252 
047617 TST41: LDOFPS 8047617 8 FLOA UNG POINT Szarys 7 
1S oBe cPrut: COPxXP 6177706. ACS ae 3e ary 
is rPi4i: BOEBS PRS a at rd nrg THe “peole pe. 
047610 CHP #047610, FPS 5 TORE HECK FLOATING POI POINT STATUS 
HLT , dy NOT EQUAL TO D47610 
173524 ST AC3, . ANS!  § ;STORE C3 INTO ANS! THRU ANS4 
121452 173816 a eici4S2,AaNS! :CHEC l 
SEQ +4 ‘BRANCH IF OK 
Hi T+4 “ANS! NOT EQUAL TO 121452 
125252 173506 CMP eicS2S2,ANnS2  :CHECK ANSE 
BEG +4 ‘BRANCH IF OK 
HT +4 -ANS2 NOT EQUAL TO L2S25z 
12S2S2 i7347é oMP g12S2S2,ANS3 :CHECK ANS3 
SEG +4 i BRANCH IF OK 
Hl T+4 -ANS3 NOT EQUAL TO 125252 
12S252 1724kE OMP gi25252,ANSY s CHE ANS 
SEO +4 EC RRINCH : OK 
Hi T+4 *ANSY NOT EQUAL TO 125252 
- FFSESFLSLESLLESFASLSSSAFLFLRELLASSLASLALLLESFEFLESERAALTLEFEAFLATEPLEAARSS 
“TEST 42: TEST LDEXP (LOAD EXPONENT DOUBLE MODE phe 
§00135 --> 052525, 052525, 05252 gSe5e5 s=) 067325, 052525, 9S2525, 2S2tz= 
FPS = 047600, SRC = Me-R7, Ace 
 snnueanet bess beads teSk7y.castazshSvassusssosecnerecnrenens 
COPE 
BR TST42 
oS2525 oS2525 paTse: oS2525,052525,0S2eSe5 052525 
047617 TST42: LDFPS #047617 -LOAD FLOATING POINT STATUS . 
177760 09 DATY¥2. AC2 -LOAD 052525, oSe5e5 052526 052525 INTO AC2 
00135 FPIu2: LDEXP  8000135,ACe LOAD 900135 INTO THE EXPONENT SF ACE 
STFPS FP “STORE FLOATING BOINT STATUS 
047600 CMP #047600, FPS ; CHECK FLOATING POINT STATUS 
QFG +4 “BRANCH IF OK 
HLT “FPS NOT EQUAL TO CH7ED 
172406 STO C2, ANS1 ;STORE ace INTO ANS! THRU ANS 
$7225 172400 7p 006722S5.ANS! § : CHECK ANSI 
BEG a4 - BRANCH Ie G 
HLT +4 -ANSL NOT SuaL TO O673s5 
Mestes $= 173372 CMP a0S2525,ANS2 :CHECK ANS 


acted Pit ~DCFPR-8 TEST OF LDEXP, STEXP  MACYLL 271732) O3-SEP-76 14:10 PAGE 30 


SCFPKEL PL! TEST SECTION 
nos4:4 001401 BFQ +4, -SRANCH IF OK 
555416 104004 Hi T+4 -ANS2 NOT EQUAL TO OS2S52¢ 
905420 g22767 OSeS25 173360 oMP a0S2S25,ANS3 = : CHECK 
see 1401 SEQ +4 : H i ox ba 
555430 104 HLT +4 -ANS3 NOT EGUAL TO OSes25 
SOS432 922767 OS2525 173350 CMP #0S2525,ANSY —_ s CHECK 
F*S445 001401 BEQ +4 ‘BRANCH IF OK 
BRSay2 104004 HiT +4 -ANSY NOT EQUAL TO OS2S25 
ee are eee eee eee ee eee 
TEST 43: TEST LDEXP (LOAD EXPONENT}. DOUBLE MODE 
: 900200, — 140425. 125252, !2S2Se, jeb252 = => 100025. 126252, i2s2¢2, :2¢2¢2 
; FPS = 147616, SRC = Me-R7, aes Ac! 
FEC = ig. FEA = FPI43' 
 LEEESELERELER EAE SER ERESSSSESESSESESAS SESS ESAS ESSERE ASSESS ESSE SESE EEE EES 
OOS444 194400 SCOPE 
555446 00404 BR TST43 


140425 ieS2eSe i2S2S2 DATHS: 14042S, 12eSeSe, i2Se2Se, i2eSeS2 


005460 170127 047617 TST42: LDFPS 9047617 -LOAD FLOATING POINT STATUS i 
005464 172567 177760 LOD DATH3. ACL “LOAD 140425, 125252, 125252, 125252 INTO 4c: 
005470 176527 900200 FPI43: DE XP #900200, at “LOAD OOO200' INTO THE EXPONENT OF Gc: 
005474 179200 STFPS -STORE FLOATING POINT STATL 
005476 170367 173320 STST a :STORE EXCEPTION CODES P 
ocss02 ‘022700 147616 CMP #147616, FPS “CHECK FLOATING POINT STATUS 
505508 001491 BE +4 “BRANCH IF OK 
905510 104090 LT -FPS NOT EQUAL TO 147616 
nossi2 oe2e767 s0ccio 173302 CMP wid, FEC : CHECK FLOATING EXCEPTION CODE 
p9s520 001401 864 +4 RANC 
909 HLT Fee NOT EQUAL TO 10 
905524 022767 O0S470 17327 CMP BFPI43, FEA “CHECK FLOATING EXCEPTION ADDRESS 
905532 001401 BE +4 -BRANCH IF OK k 
905534 104000 HLT -FEA NOT EQUAL TO FPI43 
90SS36 174167 173240 STD ACI ANS!  ;STORE ACL] INTO ANS! THRU ANSS 
o9sS542 oee767 i000eS 172222 CMP 199025,ANS! § :CHECK ANSI 
MOSsso O014e) BEQ +4 BRANCH IF Ok 
p9ss52 104004 Hl T+4 -ANS! NOT EQUAL TO 100C25 
905554 022767 125252 172222 CMP ei2S2s2,ANS2  : CHECK ANS2 
posst2 00140: BEG +4 -BRANCH IF OK 
5055e4 104904 Hi T+4 -ANS2 NOT EQUAL TO L2s2S2 
SOSStE 022767 126252 173212 CMP #125252, ANS3 : CHECK ANS3 
5595574 sci9e! SEQ +4 -BRANCH IF OK 
Soce7e 104004 Hi T+4 ‘ENS “NOT FBLA TO L282s2 


SOSEODO Oee7é7 ieSeSe 173202 CMP eieS2eS2,4NS4 sCHECK MNSY 
wWeete OUL4C) BEC > :BRANCH TF Ok 
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B.P3 TEST SECTION 

ocse:c 6124004 HLT +4 -ANS4Y NOT EQUAL TO 125252 
iTEST 44; "TEST DEXP (LOA0 EXPONENT), DOUBLE MODE 
TEST ( 
: 177600 --> O04 3. resee8, [esese. 1 Lesebe ss =) E Dab t os. 125252, 128252, 1252¢2 
EPS = ” ectee Ee 
oe Pa io Ne eats 

coS6i2 10440C SCOPE 

555614 do04o4 BR TST44 

505616 O40S25 125252 125252 DATH4: O40S52S, 125252, 125252, 125252 

905624 125252 

905626 170127 O47617 TST44: LDFPS #8047617 sLOAD FLOATING POINT STATUS 

[5532 172467 177760 oe 20 DATY4, aco SLOAD O40S25, 125252, 135252. 126252 INTO Aco 

505836 176427 177605 FeTYu: LDEXP #177600, A CO “LOAD 177600 INTO THE EXPONENT OF O09 

905642 170200 STEPS -STORE FLOATING POINT STATUS 

Dobe 470367 173152 eis Ee | -STORE EXCEPTION CODES 

OS5650 147604 =M #147604, FPS t HECK LORTING POINT STATUS 

oes6s4 o01401 8E9 +4 “BRANCH IF 

oosese 104oc° HLT “FPS NOT EQUAL TO 147604 

O9S660 022767 O00012 172134 cmp siz, FEC -CHECK FLOATING EXCEPTION CODE 

O0S666 901401 3E9 +4 “BRANCH IF Ok 

005870 104000 Hi T “FEC NOT EQUAL TO le 

005672 022767 OOS636 173124 cmp eFPI4us FER ;CHECK FLOATING EXCEPTION ADDRESS 

905700 901491 REQ +4 “BRANCH IF OK 

O00S70e 104000 S aa :FEA NOT EQUAL TO FPI44 

005704 174967 173072 ST] aco ANS -STORE ACO INTO ANS] THRU ANS 

095710 022767 O00:25 172064 CME #006128, ANE! -CHECK ANS! 

095716 001401 BEG -BRANCH IF Ok - 

006720 104004 Hi +4 -ANS! NOT EQUAL TO O0O1es 

N0S722 922767 lesese 173054 CMP #125252, ANS2 =: CHECK ANSe 

905730 901491 REO ‘BRANCH IF OK 

905732 104004 Hi T+4 -ANS2 NOT EQUAL TO 125252 

905734 022767 125252 173044 CMP e125252,ANS3 CHECK ANS 

505742 00:49! BEG +4 -BRANCH IF OK 

60744 [0454 Hi T+4 *ANSS NOT EQUAL TO 125252 

NCS746 022767 125252 173034 CMP e125252,ANSY CHECK ANS 

905754 90:40: BES +4 *BRANCH IF OK 

SOc75— 104004 Hi T+4 :ANSY NOT EQUAL TO 125252 
s SLESFEAELSESAFELAFSLELLAELELAERELALAEESASFELERASRAELAARALATSLFARASAAESLSRLE 
- TEST 45: TEST LDEXP (LOAD EXPONENT) DOUBLE MODE - 
; 77575 --» OS0505,050S505,0S0S05,0S0S0S ==> O77305,9S0S05, ososoS .2Soscs 
: tps = 147600, SkC = Me-R7, AC = 7303 
: FEC = le FEG = FPIMS’ 


: LEESSELEESPELES EEERELE ESE ESESSAS SRA RERESRAEESLSES ERAS EEE EES EE SEES REEES 


005760 
00862 


6 ( “ 
e382 
005S774 
006000 
008004 
006019 
006012 
006016 
006022 
OC&024 
096026 
006034 
006036 


006114 
C06 lee 
006 le4 


006126 
096130 


006132 
O06 i40 


 MRINDEC-11-DCFPK-8 
nPeDKE Fit 


104400 
000404 


022767 
001401 
104004 


104400 
000404 


140425 
125252 


170127 


HE Engr: ST 


O59S0S 


173004 


147600 


000012 


OC&E204 


172724 
077305 


050505 


050505 


leS2Se 


O46ECS 
177760 
000203 


OS0S0S DATYS: 


\7e7b6 


172756 


l7e716 


172706 


172676 


172656 


SCOPE 
BR TST4S 


TST4S: LOFPS #047617 
LOD DATYS, AC3 

FPI4S: _DEXP #177575, AC3 
FEC 

CMP = 8 147600, FPS 
+4 

CMP 8s wl2, ~—s FEC 
+4 


CMP #FPI4S, FEA 
+4 
Ac3 ANS! 

CMP #077305, ANS! 
+4 

CMP 8050505, ANS2 
+4 


CMP 8050505, ANS3 
+4 


CMP #050505, ANS4 
B ¢ 4 
HLT +4 
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0S0S05 , 050505 , OS0505 , OS050S 


‘LOAD FLOATING POINT STATUS 
‘LOAD OSOSOS, Os0S0S 050555 oS0S0S INTO ACz 
OAD 177575 INTO THE EXPONENT OF AC2 


oL. 

sare. ELOOT NG BoINt STATUS 
“ST Nee ION CODES 

; HIF OK 

sFPS NOT EQUAL TO 147E&00 
>CHECK FLOATING EXCEPTION CODE 


-BRANCH_IF OK 
-FEC NOT EQUAL TO le 


‘BRENCH TF OK EXCEPTION ACORESS 
:FEA NOT EQUAL TO FPI4S 


:STORE AC3 INTO ANSI THRU ANSH 
ANS 1 


: BRANCH IF OK 
ANSI NOT EQUAL TO 077305 


;CHECK ANS2 
BRANCH IF OK 
sANS2 NOT EQUAL TO OSOSCS 
; CHECK x 


;BRANCH IF OK 
;ANS3 NOT EQUAL TO O505c5 


;CHECK ANS4 
sBRONCH IF OK 
;ANS4 NOT EQUAL TO OSoSoS 


: TEST UE. TEST LDEXP (LOAD EXPONENT). DOUBLE MaDe 


: TEST 46: 


TEST LDEXP (LOAD DOUBL 
; 900203 --) iWB4ss 1SED¢0, lesese, leS2be = 


FPS = 046612, SAC = 


EXPONENT } 


Me- 
| enansuandasalabatthenstokensohonebussunbersdtocsaneesenssevenseensnen 


SCOPE 
BR TST46 


DATHE: 1404S, 12e5eSe, LeSeSe, i25eSe 


8046605 
DATYE. AC 
#00203. ac 


TST46: LDFPS 
LOO 

FPT46: LDEXP 
STFPS 


;LORD FLOATING POINT STATUS 


LE Masks tans he eeetAeP RUS 
ETORE FLOATING POINT STATUS 


E MODE 
=> 100625, 1eS2Se2., 125252, 125252 


eee ete teal a LDEXP,, STEXP MACY11 27<732) O3-SEP-76 14:10 PAGE 33 
OCF PKB. P11 TEST SECTION 


922700 o46612 CMP #046612, FPS CHECK FLOATING POINT STATUS 

006164 001401 . BEG +4 

B08i6& 104000 HiT Eee NOT EQUAL TO O4g612 

006170 174267 172606 STD ace ANS!  ;STORE AC2 INTO ANSI THRU ANSY 

506174 O22767 100625 172600 CMP e100625.ANS! § :CHECK ANS! 

006202 001401 BEO 44 ‘BRANCH IF OK 

506204 194004 HLT +4 SANS1 NOT EQUAL TO 100625 

o06208 Oe2767 125252 172570 CMP #125252,ANS2 CHECK 

066214 oo140: BEQ +4 -BRANCH IF OK 

906216 104004 HLT +4 -ANS2 NOT EQUAL TO 125252 

006220 022767 125252 1725&0 CMP e1252S2,ANS3  : CHECK ANS3 

096226 001401 BEQ +4 :BRANCH IF OK 

006230 104004 Hi T+4 -ANS2 NOT EQUAL TO 125252 

p0s232 Oe2767 125252 17255C CMP #125252.ANSY CHECK ANSH 

006240 00140: BEQ +4 BRANCH IF OK 

p0se42 104004 HL T+4 ANS4 NOT EQUAL TO l2Se2S2 
re te nie toe ae eee 
-TEST 4 TEST LDEXP (LOAD EXPONENT). DOUBLE MODE 
“t77577 --) o4OSeS 125252, leSe2Se, les2S2 ==) 090000, 900000, sefe89. osD920 

FPS = 045604, SRC = Mo-R7 € = ACO 

Se DEREAEEAEEEEEREESESEREREDEREREEEEEEEESEREEEESSEEEEEEEEEESEREEEEEREES 44 

p0se44 1944oo SCOPE 

006e46 O90404 BR TSTY7 

006250 O40S25 125252 125252 DATH7: O40525. 125252. 125252. 125252 

008256 125252 

096260 170127 O4S617 TSTH7: LDFPS #045617 -LOAD FLOATING POINT STATUS 

COB264 172467 177760 | LOD DAT47, ACO ; LOAD 040525, 125252, 125252 12525 3 INTO ACD 

176427 177577 SPI47: LDEXP 9#177577,ACD -LOAD 177577 INTO THE EXPONENT OF ACC 

906274 170200 STFPS FPS ‘ET ORE FLOATING POINT ETE eue 

006276 022700 o4Sé04 CMP nO4SE04, FPS “CHECK FLOATING POINT STATUS 

906302 001401 BE ‘BRANCH IF OK 

906304 104000 HLT “FPS NOT EQUAL TO O4SE604 

006206 174067 172470 STD Aco ANS!  ;STORE ACO INTO ANSL THRU ANS' 

9963le Oe2767 Oocc0o 172462 CMP 800000. ANS! CK AN 

996320 001401 BE 9 +4  ERRNCH IF Ok 

O0b3e2e 104C04 Hi T+4 -ANSL NOT EQUAL TO OCccOoC 

006324 o22767 o00000 172452 CMP wOD0000,ANS2 § ;CHECK ANS2 

996332 O0:401 BEG +4 ‘BRANCH IF Ok 

996334 1046004 Hi T+4 -ANSe NOT EQUAL TO O00009 

906336 022767 oOCoDDO 172442 CMP #O00C00,ANS2  :CHECK ANS? 

556344 O0149! BEo +4 -BRANCH IF 

SOe246 104004 HL T+4 -ANSS NOT BURL TO epeooo 

90620 fe2e767 NNCDOS 172422 CMP sO000009.ANS4 § :CHECK ANSH 


S256 O0:46: BEG 44 ‘BRANCH IF OK 


006360 


eJb36< 
J0S364 


Spears 


006476 
O06500 


006502 
CSE504 


COES06 
006514 


MRINDE C=; Ps i- -DCFPK-5 
SSFEKEL EL! 


1o400% 


Bis 
1701e7 
172467 


104004 


104400 
0004S4 


0S2S25 
OSeSe5 
170127 
172667 


0ie70e 
176652 


? 
7 
! 


TES! 
Tes 


lelele 


047617 
177760 
177706 


047610 


172350 
lel4le 


lelele 
lelele 


lelele 


OS2S25 


047617 
177760 
000135 


#000125, ke 
FPIS1: LOEXP Re, ace 
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HLT +4 -ANSY NOT EQUAL TO 000000 
Pa E REE RHEE tee ETT ho DEIEHT) Ate 
: SO: TES et DEXP (LOAD EXPONENT), DOUBLE M 
; 177706 --) 1S6ele i212, l2le2le, ial2le = => lei4l2. 121212, 121212, 121212 
FPS = 047610, SRC = MO-RS Ac = AC 
s pnnnenenebocesearesdonenesegeonenebenesenenescsevessencsescsosesosenees 
SCOPE 
BR TSTSO 
12212 DATSO: 156212,121212,121212, 121212 
TSTSO: LOFPS #047617 -LOAD FLOATING POINT STATUS 
LDD DATSO. Aco -LOAD 156212 leiele 121212, 1212!2 INTS aco 
MOV lee RS ; PUT EXPONEN NT INTO 
FPIsc: * LDEXP aco a5 77706 INTO THE EXPONENT OF ACO 
STFPS - STORE  LOAT ING POINT STATUS 
CMP ¥O57610,FPS CHECK FLOATING POINT STATUS 
BEQ +4 “BRANCH IF OK 
HiT -FPS NOT EQUAL TO 047610 
: ST Aco ANSI!  ;STORE ACO INTO ANSI THRU ANS4 
172342 -MP #121412, ANS] - CHECK ANS] 
BEG +4 “BRANCH IF OK 
ui T+4 “ANSI NOT EQUAL TO 121412 
172222 CMP e121212,AQNS2 § ;CHECK 
BE +4 z BRANCH H IF OK 
Hi T+4 ANS2 NOT EQUAL TO 121212 
172322 CMP wicl2l2.ANS3  ;CHECK ANS3 
BEG +4 “BRANCH IF OK 
Hi T+4 -ANS3 NOT EQUAL TO 121212 
172312 CMP #i21212,ANS4  ;CHECK ANS4 
BEG +4 “BRANCH IF OK 
HL T+4 -ANSY NOT EQUAL TO 121212 
SEAL ELELLERELSRE REALL SLA LAL ALL LEAL AE LSLA SEE LEAS LAA RALALARATALEAETRI LAE 
TEST Si: TEST LDEXP (LOAD EXPONENT), DOUBLE MODE 
000135 --> 052525, 052525 , 052525 5, QReSeS 5 => 067325, 952525, 052525,9 
FPS = 047600, SRC = MO-Re. AC2 
 puncacnsbenenesensbuosnecensesonsbonssesessessocsnonsccssccsuccouccees 
SCOPE 
BR TSTS1 
952525 DATSI: OS2525,052525, 052525, 052525 
TSTS1: LOFPS #047617 -LOAD FLOATING POINT STATUS 
D DATS!, ace :LORD 052525 OS25e5 052525.052525 INTO Ace 
MOY “BUT EXPONENT INTO R 


e 
;LOAD 000135 INTO THE EXPONENT OF ACe 


- ——_— ee ee eee et eee ~- 
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| TEST OF LOEXP, STEXP 
OCFPKB. P11 


TEST SECTION 
006534 170200 STFPS FPS -STORE FLOATING POINT STATUS 
0065 36 022700 047600 CMP #047600, FPS i CHECK FLOATING POINT STATUS 
ARE 44 variance ; NOT QUAL TO 04760C 
4 ? T Q AN INTO ANS! THRU ANSY 
RppedS AcISRS AZSSHE 5252 amp «BOE 2305, BNET 5 es 
906560 001401 BEG +4 F OK 
on6S62 104004 HLT+4 ‘ANSI NOT EQUAL TO 067325 
DOSES 767 OS2eS25 172212 CMP w0S2S2S,ANS2 ; CHECK ANS2 
6572 O01401 BE +4 :BRANCH IF OK 
006574 104 HL T+4 . -ANS2 NOT EQUAL TO OSes25 
7% O22 052525 172202 CHP 8052525, ANS3 ; CHECK ANES 
1401 EQ +4 *BRANCH IF OK 
006606 104 Hi T+4 -ANS3 NOT EQUAL TO OS2S25 
996610 2767 OS2525 172172 CMP #0S252S,ANSY  ; CHECK k ANS 
1 1401 BE +4 ‘BRANCH IF OK 
906620 104004 HL T+4 -ANSY NOT EQUAL TO OS2S25 
iTEcT Go: TEST GTEXP (STORE EXPONENT) DOUGLE MODE 
: TEST Se: TEXP (STORE EXPONENT), DOUBLE MODE 
pogo 0 905 0° “000, cs 000 --> 77600 
= 0476 FCC = OST = M&-R7 
 nnuumennhenotnetttbenmbbesstibuasessontansatiiasanestzensuenonmenst 
006622 104409 SCOPE 
006624 oo0494 BR TSTSe2 
06626 O00000 O00000 of0000 DATS2: 000000,900000, 000000, cocDD0 
606634 090900 
170127 047617 TSTS2: LDFPS #047617 ;LOAD FLOATING POINT STATUS 
O06642 172567 177760 LDD DATS2, AC! -LOAD 000000, 000 900, eooood. gooce INTO ACL 
006646 175167 172130 STEXP ACI ANS! $10Re THE EXPONENT OF ACI IN ANS! 
006652 013767 177776 172124 MOV aaPs pNSe 
DOBEED 046767 177769 172116 BIC #177760, AN She COnol TION CODES 
00 17 STFPS ST PNDATING POINT STATUS 
006670 022700 O47610 CMP #047610, FPS CHECK FLOATING POINT STATUS 
D065 74 1401 BE +4 :BRANCH IF OK 
76 1040 HL -FPS NOT EQUAL TO 047610 
006700 022767 177600 172074 CMP #177600, ANS! 
006706 001401 BEG +4 ISRANCH | 
006710 10400! HL T+] S1 NO r eSliat TO 177600 
006712 022767 O00010 172064 CMP 810, ANS2 pee ANS2 
006720 O01401 BEQ +4 ‘BRANCH IF OK 
906722 14092 HL T+2 :WRONG CONDITION CODES! 


eet th, TERT ETE? (STORE ENENT) DAME Re 


; TEST S3: TEST STEXP (STORE EXPONENT ) 
7 040161, 061434, 143434, 125252 --> ooddo0 


FPS = 047604, Fcc = 


DOUBLE MODE 
04, AC = ACS, OST = ME-RT 


EE 8 ee ete 


eee —+——- . —— eee 


007104 
007112 
007114 
007116 


007124 
007126 


104400 
000404 
040161 
12S2Se2 
170127 
172767 
175367 
13767 
2767 


104001 


022767 
CO1401 
10400¢ 


re8t SectiGn > 


061434 
047617 
17988 
172026 
177796 
177760 
047604 
sooco0 


00004 


125250 
047617 
177760 
171724 
177776 
177760 
047600 
000001 


090009 


143434 DATS3: 


171772 


171762 


125250 


171720 
17i7le 


171670 


171660 
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, SRAAAHLELELAAARALAEAAAAALALALALA LAE LAE LLAAAALARASSAEFASSLLSFSSELSS AALS SSS 


SCOPE 


TSTS3 


040161, 061434, 143434, 12eS5eS2 


TSTS3: LDFPS BOI? ns sLOAD FLOATING POINT STATUS 
LOD ‘LOAD 040161,061434, 143434, 125252 INTS AC2 
STEXP AC3 ANI “STORE THE EXPONENT’ OF AC3 IN 
MGY 3eP ANS2 =; GET _C TUS 
BIC #177760, ANSe VE CONDITION CODES 
STFPS FPS :STORE FLOATING POINT STATUS 
CNP #047604, FPS i CHECK FLOATING POINT STATUS 
HLT “FPS NOT EQUAL TO 047604 
CMP #000000,ANS1 § ;CHECK ANSI 
BEQ +4 ‘BRANCH IF OK 
Hi T+] -ANS1 NOT EQUAL TO OCO000 
CMP #04, ANS2  ;CHECK ANS2 
BEQ +4 *BRANCH IF OK 
HL T+2 WRONG CONDITION CODES! 
et oS STERT STDS (STORE D@QENT) Dammit REE 
-TEST SU: TEST STEXP (STORE EXPONENT), DOUBLE M 
; 040200, 125250, 125 So --) 000001 
= 647600 2 DST = MG-R7 
A HHHHHE HHH HHHHHHEHHHHHHHHHEHEHHHHEHEHEEHHHG SHEED EEE 
SCOP 
BR TSTSY 
DATS4: O40200, 125250, 125250, 125252 
TSTS4: LOFPS #04717 ;LOAD FLOATING POINT STATUS 
LOD DATS4, AC2 LOAD 040200, 125250, 125250, ies2se INTO AC2 
STEXP AC2 ANS1 STORE THE EXPONENT T OF AC2 IN ANSI 
MOV a#P ANS2 :GET CPU STATUS 
BIC #177760,ANS2 § :SAVE CONDITION CODES 
STFPS S :STORE FLOATING POINT STATUS 
CMP 8047600, FPS ‘CHECK FLOATING POINT STATUS 
BEG +4 ANCH IF OK 
HLT : FPS NOT EQUAL TO 047600 
CMP #000001,ANS1 § ;CHECK ANS! 
BEG +4 ‘BRANCH IF OK 
HL T+] -ANS! NOT EQUAL TO ODC0D! 
CMP sOO, aANSe ; 
BEG +4 ‘BRANCH IF OK 
Hi T+2 *WRONG CONDITION CODES! 


—_——— a ee mee ee te oF ~~ 


_— ee ees —_- A A ES ee mm 


| MAINDEC-11-DCFPK-8 
OCFPKB.P11 


007130 
007132 


007134 
007142 
pee 


00723¢ 
007234 


607220 


104400 
000404 


042525 
052525 


104001 


022767 
001491 
104002 


104400 
000404 


12eS2Se2 
1eSeSe 
170127 

2567 


104001 


TEST OF LDEXP, 
TEST SECTION 


000012 


000009 


1eS2Se 


177760 
047610 


177725 


0S2eSe5 


171616 
171610 


171S66 


171556 


1252Se 


171464 


STEXP MACY! 


1 27(732) 
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TEST GE: TEST STEXP (STORE EXPONENT) DOLE MODE 
: M 


TEST STEXP (STORE EXPONENT) 


4252 S, 052525, 052525, 
= 047600,’ FCC = 


052525 --> 00 0612 


OST = M6-R7 


503 
t snnnnnnasenesocnncbonenesennnsionnoensezonessabocsensncsnensesonsecect 


SCOPE 
BR 


DATSS: 


TSTSS: LODFPS 


© 
$ 


TSTSS 


8177760, ANS2 
FPS 
#047600, FPS 
+4 


#000012, ANS1 
+4 


7610 


CHECK AN 
*BRANCH IF OK 

sWRONG CONDITION CODES! 

vEcT Gk: TEST STEXP (STORE EXPOMENT) TOME ME ee 


E TEST STEXP (STORE EXPONENT) 
; lesese, 126252, Le6ese, 125252 --> 177725 


O42S2S , 0S2SeS , OSeSeS , OS2S25 


baie FLOATING POINT STATUS 

er ag JY 0 “oe it oe Raga ACS 
ul uit 
CONDIT 1ON CODES 


STORE FLOATING POINT STATUS 
; CHECK FLOATING POINT STATUS 
;BRANCH IF OK 

FPS NOT EQUAL TO 047600 
;CHECK ANS] 


BRANCH IF OK 
ANS! NOT EQUAL TO O0CQ1e2 


DOUBLE MODE 
DST = ME-F7- 


AC] 
s snnadeunntanabanaaahonnntzenabsionsnenentansestinnnmmattanehonansesens 


SCOPE 
BR 


DATS6: 


TSTSE: LDFPS 


TSTS6 


#047617 
DATS6, ACI 

AC! ANS! 
a#PS, ANS2 
#177760, ANS 


#047610,FPS 
+4 


#177725, ANS] 
+4 


12eS2eSe2, leSeSe, leSeSe, leSeSe 


sLOAD FLOATING POINT STATUS 
“LOAD 125252, 125252, 125252. 125262 INTO AC! 
-STORE THE EXPONENT OF ACI IN ANS! 

-GET CPU STATUS 

-SAVE CONDITION CODES 

:STORE FLOATING POINT STATUS 

-CHECK FLOATING POINT STATUS 

: BRANCH IF OK 

-FPS NOT EQUAL TO O47610 


;CHECK ANS] 
sBRANCH IF OK 
;ANSL NOT EQUAL TO 177725 


ee —_—— — i re ae ——— re —_—_ 


— —- _- —— ee _— 


| MAINDEC-11-DCFPK-B TEST OF LDEXP, STEXP § MACY11 27(732) O3-SEP-76 14:10 PAGE 38 
| OCFPKB.P1I TEST SECTION 
go732e e767 000019 171454 CHP #10, ANS2  ;CHECK ANS2 
; 1401 Q +4! ‘BRANCH IF OK 
007332 104002 HL T+2 WRONG CONDITION CODES! 
: KLKAFRAAAF LEAKE LZLREKREAAASRERALE LA LSA ASSLRASASARASRASEALALALAKFKRERALALSRALAEE 
: XPONENT), DOUBLE MODE 
; 052525, 052525, 05525, 0Se525 --) ooobse 
F ? AC = AC3 OST = Mb-R7 
 snnonncnanennscazenbonsnesoscsehoncencessoecesehncnsennssensensenscnace 
007334 104400 SCOPE 
007336 900404 BR TSTS7 
007340 OSeS25 o52525 052525 DATS7: OSeS25, 052525, 052525, 052525 
057346 OoS2s25 
007350 170127 047617 TSTS7: LDFPS #047617 sLOAD FLOATING POINT STATUS 
7354 i7e7b? 177760 LOD DATS7, AC3 a 052525, 052525,052525 INTO ACZ 
7360 175367 171416 STEXP AC3 ANS1 “STORE THE EXPONENT OF ACS IN ANSI 
007364 013767 177776 171412 MOV aePS,  ANSe ; GET PU STATU 
007372 O42767 177760 171404 BIC 177960, ANS2 =: SAVE ITION CODES 
o07400 1 STFPS FPS -STORE FLOATING POINT STATUS 
007402 922760 047600 CMP #047600, FPS ; CHECK FLOATING POINT STATUS 
007406 O0!401 SEQ +4 :BRANCH IF OK 
007419 i04000 HLT - FPS NOT EQUAL TO 047600 
007412 Gee7s7 oN00S2 171362 CMP #900052,ANSi  ;C 
7420 6001401 BEQ +4 ‘BRANCH IF OK 
007422 104001 HLT+1 -ANS1 NOT EQUAL TO ocOgSe 
007424 o22767 cocoso 1713S2 CMP #00, § ANS2 ;CHECK ANS2 
907432 001401 BEQ +4 -BRANCH IF OK 
007434 104902 Hi T+2 WRONG CONDITION CODES! 
s KEFZELLLSEELAELLRELELLLLLAE LEELA ELLE LELAL EE RA ELA RLEEALELELALELAE RELEASE 
-TEST 60: TEST STEXP (STORE EXPONENT) “DOUBLE MODE 
; 177777 177777, 177777, 177 > 900177 
47600, FCC = ACL, DST = Mo-R? 
 exnnennt ca eee eee caensat eis MliavessneD eT aiatSseeenns 
007436 104400 SCOPE 
007440 o00404 BR TST6O 
007442 177777 177777 177777 DAT&O: 177777,177777,177777, 177777 
GO7450 1777 
170127 047617 TST&O: LOFPS #047617 sLOAD FLOATING POINT STATUS 
007456 172567 177760 LD DAT6&0, AC! ‘LOAD 177777,177777, 177777, 177777 INTO AC! 
7462 175167 171314 STEXP ACI ANS! § :STORE THE EXPONENT OF ACL IN ANSI 
007466 013767 177776 1712310 MOV ae? ANS? GET CPU STATUS 
907474 42767 177760 1713%e BIC #177760,ANS2 § :SAVE CONDIT ION CODES 
7502 170200 STFPS S :STORE FLOATING POINT STATUS 
07504 022700° C47&00 CMP #047600, FPS -CHECK FLOATING POINT STATUS 
007510 cOl40i BEQ +4 ‘BRANCH IF OK 
007512 104000 HLT “FPS NOT EQUAL TO O47SCO 


—_— = 


Se rt ee et ee ee 


———— ew me ee 


O07S4e 
007544 


CC7E46 
007654 


007704 


1040Ge 


io4oce2 


194400 
000404 


leS25e 
leSeSe2 


170127 


010367 


——_— —— ee 


TEST OF LDEXP, STEXP 
TEST SECTION 


000177 


CO0000 


047610 


177801 


000010 


i2S2Se 


047617 
177760 


177776 
177760 
17107¢ 


171260 


171250 


C00800 


171800 


171156 


171146 


leS2Se 


4 
, 
' 
: 


MACY1i 27(732) 


CMP 
BE 

HL T+ 
CMP 
BEQ 
HLT+e2 


parma Otago > ry. 


#000177, ANSI 
. +4 


#00,  ANS2 
+4 
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; CHECK Ra 
Bran NOY EQU EQUAL TO 000i77 
; CHECK 


;BRANCH IF OK 
WRONG CONDITION CODES! 


XP (STORE EXPONENT) 


OST = 


MG-R7 


TE THEI EYP (STORE EXPONENT) DOUBLE MOLE 


 penqunecenensrocseebecnassususebeceessnnsenaesshessnssonssssesaceossens 


DATbi: 


TSTél: 


SCOPE 
BR 


TST61 


006200, 000000 , 000000 , 0080080 


Cob ObBe0d, Bo0000, oG0G00; ogog00 INTO acs 


76 
DAT61, AC3 
AC3 ANSI 
a#P AN 
#177760,AN 
FPS 
8047610,FPS 
+4 
#177601,ANS1 
+4 
#10, ANSe - 
+4 


sree 

Se ENB TTTOR CODES 

-STORE FLOATING POINT STATUS 
-CHECK FLOATING POINT STATUS 
“BRANCH IF OK 

-FPS NOT EQUAL TO 047610 

: CHECK 

-BRANCH IF OK 

“ANSI NOT EQUAL TO 177601 
-CHECK ANS2 

“BRANCH IF OK 

:WRONG CONDITION CODES! 


[eeeeeneeneameeee tis iter idea, inte 


° 
9 
° 
4 


 sapscennasenuccanes 


DAT&2: 


TSTé2: 


STEXP (STORE eer 


TEST 
ies 2 Ispene, » lepene, | 


SCOPE 
BR 


= O47 


TST62 


DOUBLE 
125252 --> 27725 


125252, 125252, 1eS2Se, leSeSe 


#947617 
DATbe, 
ACC 
aePS.  ANS2 
4177960, ANS 
R3, ANS! 


ACO 
R3 


sLOAD FLOATING POINT STATUS 


MO-R3 


ae’: ACO OST = 
vheuenccanneebussansasseseastbenneensesaseaaeaseaess 


he “FRE EAPORERT deogns 16 1E>6 3 INTC ACO 


U STATUS 
BEE “CONDITION CODES 
-SAVE R3 FOR TYPING 


—_—— ~- 


’ 
= ———— ee ee ew ae ER 6 EE Cee Ce © 2. Se ee Oe w——, oe ee ee Oe ee eh eee , 


i cll - = = a 

OO 
Sie 
ww ew a Uwe 
a me aa er _amaece 
sande G48: 
newrsy §«20%%° spe 
mo ie, 
Semes 154052 
NOTTHE «1 ONHDD 
S677sC | BdoNos 
ae Bas SH 
007762 170127 ON7EI7 
pte ae ears 

a 

Bidets Braves foasee 
6:50i4 170200 
010016 22790 O47600 
e8eSq Poadoe 
919026 922767 sf000Sz2 
510034 90:40! 
510036 18400! 
S19040 922767 9000 
PID04E 80140: 
51505C 1D4002 
s100S2 104400 
510054 Sooo4 
Oi00Se osnese 128262 
70564 Sese5e 





JS2SeS 





“Ere _ ec “x wi7SkE-7e 4:5 Fak OM 
erene ese €? *ae io “~~ eee” 67 7%,° ee a e 
2 ~ “ tee a *s a o “ we 
ue 9297510, 7% sEweck BLOmTENG elise Ecarce 
sts _ : BRANCH TF OK 
sa oc crm, °S owe se 
Vr Bic (2S, ANSI ; CHECK _- 
SES oa ’ H iH o-* 2a 
HLTe) : 1 NOT EQUAL ~25 
oP Bic, ANSE ; CHECK — 
BEG lw SBRANCH TF OK 
HL i¢e > WRONG COND I1 3 ON ~oveES! 


: *@ as aay etiam Tater Paice tera eee ennanannanneee 


"EST 63: TES’ STEXP (STORE EXPONENT), DOUBLE ™ 
952525, 0S25es.. 052525 -- noots3” 
Fes = Au7E00,° Frc = 5 ) OS" = “O-5s 
 caaaunenatenstensbtlassatiosettionhsensatauattiemsesdttnate cen teeess 
sae 
36 73763 
OBER: OS2525, 052525, S226, 2S2525 
"S"£3: LOPS 0047617 ;LORD FLOATING POINT STATUS mmocen ita Oe: 
BYEp Kee peagee Gprase- feeges INT A 
MOV a8P3 BNSE GET CPU STATUS ee 
my ORG taney Seave mda opine 
STFPS = FPS :STORE FLOATING POINT STATUS 
oMP 8047690, FPS :CHECK FLOATING POINT STATLE 
SEs +4 : BREN IF Ok 
HL? PS NOT EQUAL TO 047500 
c! sCCOOS2,ANS: § ;CHECK ANS! 
BEG +4 “BRANCH IF Ok 
Hi T+] :ANSI NOT EQUAL TO O0cCS2 
CMP s0C, ANS2  ;CHECK ANS2 
SE9 +4 :BRANCH IF OK 
HL T+2 WRONG CONDITION CODES! 


Bhabha lalaliahalalalal-b-b-b-tah-b-taghtaded -t-1-5-5-tab-tehdalchbat- inhaled jntah-bal-taheh-t-t-halailahahahedababalaiataieiee 


-TEST 64: TES! STEXP (STORE EXPONENT). DOUBLE MODE 
; o50e62 12 S2, leS2S2,052525 --> ocods! 
: FPS = 047600 FCC = ac = hes OST = M2-R7 


PTT 8 RE as OR SN SR FC, al 


SCOPE 
BF 


CRTES: 


MRINDECS- =Li-DCFPK-5 
DOF PRE. PLL 


' 


Stets: 
FF otnd 


*0-- > p= 9 
d-2 ><> 
Oo’ £fumM 


-* 0-+6 -6-+ > <6 -« b-<§ -<6-< p= » << »-« p< 6 §< 
SZK 


OQoodOoIOI0OU0000 


£ 
ru 


e-9-6 -~9-~—< 


OOM O00 OONOOWOIOOOOOIOWOI00D 
Ooo Oqoqndcn 


aw <b b-2 Bh 2 ho 0 ho pe 
Pe OWE 


& ©) op-- 


e 
a 
om 


forufururururuny foro fu 
KEVSHwrw of 


e 


fororory 


Q 
’ 


&--6 20-° > --0--6 + » = >< > -« 2 >= & « > + >= > &-¢-< e—-p-+ 


OO COW WIONOOOOOOOIOIONO 00 OOo 
cr nN 
ore re 


OF 
3 


=: 0276 


‘fff... 





C1ie767 
bec767 


5 5pe apt 


TEST OF LOEXP, STEXP 


TEST 
047617 


b00082 


177776 
177760 


047600 


177734 
00004 


O00S0o 


161616 


177775 
177763 


O47510 


177734 


ald ¢ jf 


SECTION 


034343 


170504 
L7047€ 


TST64: 


ANREY: 


: TEST 
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LOFPS #047617 ; LOAD FLOATING POINT STATUS . 
OP pared. "LOAD OS02S2, 12eSeS2, 125252, 952525 INTD acz 
L NRE4Y 
teed Ace, (PC)¢ stent THE EXPONENT OF ACe IN . +2 
a .410 
HAL T 
HAL T 
HALT 
MOY APS, | ANSE T CPU STATUS 
BIc #177760,AN VE CONDITION CODES 
STFPS CFP : STORE FLOATING POINT STATUS 
re a OPPS : CHECK a ae POINT STATUS 
HL T ‘Eee NOT EQUAL TO 047600 
MOV 64. ANS! 
CMP auc8ott ANS! CHECK ANS | 
BEG *BRANCH IF OK 
HL T+] “ANS! NOT EQUAL TO DOCS: 
CMP 800, ANSE > CHECK wee 
Beg +4 - BRANCH IF OK 
HLT +2 : WRONG CONDITION CODES! 
; SPSEREREAESSEESEDS ESSE ESTER ESESEDESSSESSEEEESEEELESE SELES SESE EET ESSE 
TEST STEXP (STORE EXPONENT). DOUBLE MODE 
o27616 igiele, 034343, 070707 <-> 177737 
647 FCC = 10 Ac = ACO OST = Mz2-87 
: ssuennapntesakantitiacentionstiemsassetiasstiionenmtiasmotannesses 
SCOPE 
Ze TSTES 


DATES: 


TSTES: 


BNRES: 


027616, 161616, 034343, 07070 


LOFPS 


8047617 ;LOAD FLOATING POINT STATUS 
DATE. Aco -LOAD O27618, 161615, 034343, 070707 INTS ace 
ACO,  (PC)+ ;STORE THE EXPONENT CF ACO IN .2 
+10 
aa? Ss. ANS? -GET CPU STATUS 
93777 BO.ANS? =; Seve CONDITION COQES 

TORE FLOATING POINT STATUS 
8047610. FPS -CHECK FL gat ING POINT STATUS 
+4 - BRANCH IF 

“FPS NOT Fata TO O87EL0 

ANRES, ANS] 
8177727.AN5] -CHECK ANS] 
+4 -SRANCH IF Ob 


DO4 


MAINES $2 1-DCFPA=8 TEST OF LDEX®, STEXP  -MACYL! 271732) 03-SEP-76 14:10 PAGE 42 
StFEKELEL! TEST SECTION 
019306 10400: HLT +! sANSI NOT EQUAL TO 177737 
$103:D 92277 OO001D 170466 CMP gic,  aNse s CHECK Ai 
=:xgi8 riot a Ye ty WRONG EM. ON CODES: 


oe sowie 


MRINOEC <$21-DCFPK-B TEST OF LOEXP, STEXP MACY11 271732) O3-SEP-76 i4:10 PAGE 43 


SCFPKE. EL] SELL ANO SCOPE ROUTINE 
o10322 104400 _.... DONE: SCOPE 
618304 O3e737 002090 177570 BIT eSWi0, daSwR ‘RING THE BELL” 
319336 901008 je BNE 1$ “NO! 
51 Aleve? 090207 a0le4e MOV SSELL,. TYPE -TYPE A BELL 
51034e 911604 TYPE  ,.TYPE 
510346 DOS046 i$: CLR -(6) “CLEAR TRACE TRAP 
515350 932727 o1c00o 177870 BIT eSWl2, a8SWR “RUN WITH TRT? 
013356 901010 
515360 O96167 o%1222 COM TRPB 
Siesee Sea 092 Bre “s (6) ET TRACE TRAP 
~ \ : i 
5! RPSoue SpOSES MOV SSEAIR. =) ‘ine TO ant OF TEST 
510378 900412 BR YESRT 
10400 Dlerae 901068 23: MOV sBESIN, = (6) ; JUMP TO START ge TEST 
10404 O13 He MOV aed2,R0 “GET MONITOR ADDRESS 
6104ic oo14 BEQ 3$ -IF NONE 
910412 OO4710 JSR 7.<0) -50 TO MONITOR 
910414 o00e40 NOP 
OL0416 NOP 
910420 900240 NOP 
910422 o00002 3$: RT! 
o10424 oo0002 YESRT: RTI -RETURN TO PROGRAM FROM TRAP 
910426 032737 ooo40o 4177570 .EMT: BIT eSWO8, asSwe -KILL LDUS OR LOOP ON SPEC. TEST 
910434 001404 SEQ | 
019436 123767 177570 170334 CMPB Os RSWR,ICNT -ON RIGHT TEST?  #SwW?-O# 
010444 091437 BEQ OVER 
510446 113703 177570 13: MOVB @aSWR,R2 -GET US BITS 
010452 170003 ‘ LUE 
910454 032737 o4o000 177570 SIT sSW14, J8SWR “LOOP ON TEST 
010462 001026 BNE I . 
010464 37 oo4one 177570 BIT eSWl1, a8SwR “KILL ITERATIONS 
0104 10ie ONE SAVLAD 
010474 105767 170301 TST ICNT+1 : F 
019500 001404 BEG 23 :BRANCH IF FIRST 
910502 126767 001106 170271 CMPB © TIMES, ICNT+1 : DONE? 
010510 901013 BNE T “BRANCH IF NOT 
910612 112767 OOO0001 170261 2s: MOVB #1, ICNT+! “FIRST ITERATION 
910520 105267 170254 SAVLAD: INCB ICHAT -COUNT TEST NUMSERS 
010524 011667 0601060 MOV (6) LAD “SAVE LOOP ADDRESS 
910530 016737 170244 177570 MOV ICNT, d@DISPLAY :DISPLAY TEST NO. AND ITERATION COUNT 
019536 oocede RTI : RETURN 
019540 105267 170235 KIT: INCB —CICNT#1 
010 016737 179230 177570 OVER: MOV ICNT, SBDISPLAY ;SET UP DISPLAY 
9iosse 905767 00193¢ TST LAD. “FIRST ONE? 
figsse 901760 hae SAVLAL 
S:5560 OLé71— cclces MOV LAD, (6) “FUDGE RETURN ACDRESS 
ei0se4 occtcde RT] FIXES PS 


ws 
=e. 


ey 
or 


~ 
o 


BeBe 


SSSseRee 


IPR IRMSRSEON 


<2 2 2 b= be hs 2 2 Fb = 82 be Bs bs hs 2 2 Bb -2 Fe be he Fe mb 0 Bo f= b= hs Bo Be B= Fhe Fo Fo Bo Fo fo ho bof 2 2 Be 


-2>-0) 2 >--9-<6 <= >—« > — §-—« &-- 5) -§-+) ~ 5) < 
© 
uw 
o 


MIMIMIOGOOIVOVOIOIIOVIVOIOY VOOM O OOOO OVWIOIAIVVIVIOIVVOVDVOOOVDVIVVOVOVDNOWOIOD 
*o-> 
.- 
© 
an 
rT 


: oe) 
e-« 

> 
» 
uw 
oo 


a 
7 
-. 
C4 
cr 


>< 
: 

c) 

c> 

5 

' 

cu 


004767 


ap Se Se tL we 
Bees 


ake 
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TES’ OF LDEXP 3 XP 
HLT ROUTINE (ERROR TYPEOUT) 
002008 177570 .TRP: BO 
tyetaee 001000 MOV 
11504 TYPE 
00040 1$: JSR 
: MOV 
020000 17757C BIT 
BNE 
011S$S2 TYPE 
SBn00s Su 
SUB 
MOV 
000212 JSR 
011560 TYPE 
MOV 
0002008 JSR 
011561 TYPE 
001202 MOV 
MOVs 
BEQ 
BPL 
OGOO0& 170074 MOV 
000019 17007 MOV 
Heecle 170064 MOV 
000014 170060 MOV 
177600 : Bic 
011581 c$: TYPE 
MOV 
000114 JSR 
DEC 
BNE 
33: TST 
SPL 
O11S55 TYPE 
170034 STsT 
170030 MOV 
C064 JSR 
011560 TYPE 
170016 MOV 
o0c0S0 JSR 
4$; MCV 
177570 TST 
BPL 
i HALT 
001089 1377570 BIT 
BNE 
FT] 
187737 CL&B 
C00420 3177576 BIT 
BNE 
177575 MOVB 
LOUB 
95 


#SA10,ceSWrR 

& . TYPE 
Tibe 

PC, ERROR 


RY -(6) 
#SW13, aeSwR 
we 


13546 Try 
3 PRINT 


sSWO9, asSir 
+4 


ICNT+] 
sSWO0S , JeSwe 
KIT 

asSWR Re 
KIT 


03-SEP-76 


14:10 PAGE 44 


;BELL ON ERROR’ 

sNO - ¥ 

- TYPE LL 

-COUNT THE NUMBER OF ERRORS 
-SKIP TYPEOQUT IF SET 


sPUT ADDRESS OF INSTRUCTION 24 S7Ace 


sTYPE (6) IN OCTAL 
; TYPE LEADING ZERO’S 


> TYPE RO IN OCTAL 
; TYPE LEADING ZERO’S 


Jt OF DATA 


AMOUNT OF DATA IN TASLE 


-TYPE STRACK? 


; TYPE PEC IN OCTAL 
; TYPE LEADING ZERO’S 


: TYPE FER IN OCTAL 
; TYPE LEADING ZERO'S 


;HALT ON ERROR 
sSKIP IF CONTINUE 


:HALT ON ERROR! 
CHECK FOR INHIBIT LOOP ON ERROR 
:SKIP IF LOOP ON ERROR 


-CHECK FOR LOAD MICROBREAK 
-BRANCH IF NOT 

-PUT MICROBREAK ADDRESS IN 83 
sLOAD MICROBREAK 

sLOOP ON TEST UNTIL NO ERRIRS 


SRE SPES= 


11-DCFPK-B 
i! 
011062 112767 
Sithss Bbeoes 
11076 112787 
11109 G1du¥6 
11196 012704 
Sillle 105014 
11114 99040s 
wee 
siiise dpppde 
Silib> 106114 
Stitse betta 
Sitis8 Agetde 
611132 106114 
O1l134 105714 
lilse Ogl4de 
11140 10626 
011144 108767 
11150 001402 
911152 152724 
i11s— 106267 
Ollise O01365 
Ollle4 O22704 
911170 o01002 
Brive 112724 
11176 105014 
011290 oocoo4 
511204 012604 
11206 900207 
911210 O0000% 
Biis20 000 
011222 - 
11226 132737 
Aiie34 001412 
Olle36 022767 
511244 001006 
11248 913700 
Siizse 801403 
511564 005537 
511260 904710 
Siizee ooo20? 


SERA DUMP OF a WBE 
000001 900130 PRINTR: 


000122 
U/777e 000115 


Ollelc 


cs: 


O0000S+ 
g000S0 


009060 
000037 


011210 
O0O0Eo 
Ci1i2i0 


23: 

A4S: 

ERROR: 
008041 


COCSHE 


OCO354 
000001 


0000106 
000042 
O0oC4e 

1S: 


PRINTS: 
M 
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MOVB 
R 


#1, A4S 
- 


att 


#-6,A4S+1 
RY. -(6) 


#3$.R4 
(4) 


ERRORS 


$1,084) 
—- 
de4¥e ,&0 


1$ 
asc 
Pc. (0) 
p- 


;SET ZERO FILL SWITCH 
;SUPRESS LEADING ZERO'S 
;SET COUNT 


SET POINTER TO FIRST ASCII CHGF. 


-CLEAR FIRST BYTE 
“ROTATE FIRST BIT 
- CLEAR Byte OF CHARACTES 
*RQTATE BIT INTO C 


sROTATE BIT INTO 
- PACK 

sROTATE BIT INTO 
-PACK IT 


<q) cy 


sCMECK FILL SWITCH 
-MGKE INTO ASCII CHAE 


-REPEST 


-TYPE IT 
sRESTORE RY 


-POUNT ERRORS 
AUTO MODE ? 


-NO? 

-TOO MANY? 

NOT YET 

-GET ADDRESS 
-FORGET IT IF ZERC 
-ZAP 4 

;CALL THE MONITOR 


RETURN 


22 
“Tle-« 


26 


>< + }—« §-—= » = b= § = &—« §—= & = §- — §—= §—= 5 -= 5-2 = §— 5 P= b= FF b—- b= b-- »—- §—= 9 —- b— §-~< PB -< & -2 B+ 6 -- BD 2 6 = & oH 6 —- & = P< -9-< 
-* 


SINSRERO? MESR ERE 


RES 


On Le 


a) 
rw 


> b—« b= 9 b—= & —< b— = b= b+ & 2 b= = P- + B= § = §— Fb 9 —* PD -- & ~ - o-- >- = b= b= & -+ & — b—- & = §--< 9 B+ & = & <b <- &- & = & ~ B= p< 9 — ph -- 
££ 


CODIWIVDOOVVOOOVOVOOOOOOOONIANND NONQOIAIOIOOOIVIIOOINOOOOOOOM 
= 
Fin 
at pst i 3 


C-11-DCFPK-§S 
Pi 

264 012777 
eve Ole??? 
300 170246 
302 170011 
304 174 
306 174146 
310 174246 
3i2 1 
314 1 
316 1 
320 17 
see 1 
3e4 0 
326 

0 

0 

0 

0 

a8 





000890 
030776 


pSWER D 
011469 G00306 POWDWN: ta 


COO34C 00030e 


00022 
01135 


00829 


8) 
i 


i 


OF LDEXP, STEXP 


DOWN AND UP ROUTINES 


000226 


000140 
506334 


POWUP: 


ILLUP: 


MACY11 27(732) 


STEPS 


LL UE aUPVEC 
0, aUPVEC+e 


ACO, -(6) 


SP SA 


AVES 
SPOnUE SUPVES 


03-SEP-76 


> RE 
-SE 
- ASC 


OWOWN , JOWNVEC 
oy ELS 


14:10 PAGE 4E 


; SET FOR FAST UP 
-PRIO:7 

: GET THE FPS 

“SAVE AC’S 


;SAVE REGISTERS 


- SAVE 


SF 
‘cay ue VECTOR 


'- sy — 


3 
LOOP FOR THE TTY 


GET 
-WRi’ 


;GET THE REGISTESS 


sRESTORE THE C'S 


THE ~poweR DOWN 
«15>«12>°POWER™ 


STORE F 
T UP VECTOR 
TZ 


; THE POWER UP SEQUENCE WAS STARTED 


: BEFORE THE POWER SOWN WaS COMPLETE 


" MAINDEC-11-DCFPK-8 TE EXP, STEXP _MACYLL 27(732) 03-SEP-76 14:10 PAGE 47 
S-FPKELP11 eer oot Ne ANS BATA ARE 





l 
Bt Wee ma ie sorb) Tt OT on TO BE TYPED 
~~ if ( ° 
gi ice 18: 1318 band Se, pone 
at aye M . es 38177566 THE CHARACTER 
att cas rey 38177564 TORE e RINTER HE Ast 
011506 BPL ve 
Stites 3: fov  B2t6) (6) eET bare three FyBED 
izle oo0004 : xg), Bo @ Yo tre BoBRess 
011524 CMP tee. m® 
011530 BNE 3$ ite | 
118 ADD #2, TTY ‘ADD 2 TO THE ADDRESS 
O11 BIC wi TTY “BACK UP TO AN EVEN BYTE 
011542 MOY TTY,2(6) “RESTORE ADDRESS 
011546 3$: MOV (6)+. TTY “RESTORE TTY 
011550 RTI : RETURN 
011552 005015 900 __ RETURN: ASCIZ 1S><1l2> : RETURN AND LINEFEED 
61155 015 oeodie oceco4o SPACE: 16)<]2)" ™  =RETURN AND 3 SPACES 
611562 000 
011564 LEVEN 

011564 900000 SAVEB: O 
O11566 172160 FPTADR: 172169 FLOATING POINT ADDRESS ON THE 11°20 
911570 O00e44 900246 FPVECT: 244 24g SECOATING POINT VECTOR ADDRESS 
011574 900024 oo00tes DWNVEC: 24,26 “POWER DOWN VECTOR ADDRESS 
011600 000024 900026 UPVEC: 24.26 “POWER UP VECTOR ADDRESS 
011604 990000 TYPE: 9 
Seat TRPB: 

1161 LAD: -LOOP ADDRESS 
51ible 900 ERRORS: 0 ; ERROR COUNT 
911634 o00377 TIMES: 377 ITERATION COUNT 


—— <o « —-——_ « — _ — _ = ———ee ooo ~ + —ewe - ee —_- -— ———wr «oe Oe Oe ee | -_—_— ———-~ -— 2 eo ew ———— et eR ee eee 
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. DCFPKE.P1I CROSS REFERENCE TABLE -- USER SYMBOLS 
acQ  2=%.000000 +t te Sess 27) oles hy okie ase" TA 68S La ne 
BAR" SH2S BG BBBE A BBBE GE - SSS SB aug” eee RUSE dBIS 
icere 17 763% 425% 477) *~ 2080 2178% 2180 2353 2357% 2358 
ac O90001 a é : 35 » 7 1127% 2 # 2S4 400# 4Ol# 407 1S494 
| SAU Go 
ieee 1Bo9s 1B46 13e5% tdEf Bath 1F35 110% lll 40) 3 g# 
Boe =*.00000 3938 472% 473% 479 Coot sea" fas coas CS7# S63 640s owl 4 
706% 707% 713 773% 774% g 838% 839% BYS 89S 897+# 3 
4 l 1186% 1187 1363% 364% 370 511% 1Sle# 1518 lE8S4 
a b 1801% 1803% 1809 18gsgs# 1900 el4l1*% 2143 2355 2387 
acs 8 609=%000003 3348 1098 0 11S6% 157 13e6# 8 1l327# §=1333 1474" {47S# 1481 16434 
= 1689 1869% 1870 192e9% 1930 1989% 1950 2049s e3Sé 23864 
acs 2000004 # 2357 238S% 
AC =~%090005 # 2 2383% 
ANR32 170 lel7* 12198 3 123i 
ANR33 004310 1253% 12558 7 
RANRS4 910104 el4e# 21448 #2156 
ANRES 0230 2179 e2lBl#e e 
&NS1 001002 4258 479% S07# SOs S35+# S36 S63# S64 S31 32 619% 
647% BYS 68Ss 68 713% 714 751% 752 789% Si17# 818 
ey 903% $0 92S 933 9S4# 983* l 1012s 
1041% i049 1070% 0 1099 1167 lle8# 1136 1160% 1190 11% 
leb7* 1eb 1296# 1333% 1334 1370 1407% 1408 1444 
1481% 1482 1S18* 1519 1565+ Sts l6le# 1613 1659% 1660 1696# 1697 
7 1771 1772 1809# 1810 1g40# i848 1870# 48 1900# 1908 1930 
1960# 1990# 1998 e02e0# e0S0# e205 83% 2089 ell4# 2120 
i 2iS7 e193% 2194 2269 2273 
ANS2 021004 426% 4B4 Sle S40 S68 S96 624 652 6390 718 756 734 
850 873 908 926% 927% 937 gsss 9S6+* 966 984% 98S 9 
1014* 1024 104%2% 1043% S3 1071# 1072 2 1100 11018 41ii1l liege 
1140 1158* 1159% 1170 1188% 1189% 1200 leeh# lees* 1236 1260 1261s 
1301 : 13 14 Sieie! 168 1363 1$70 1617 1664 j 173 
1814 18S41% 184e% 18 1871% 18728 1 1901 1902e# 1912 1931* 1932 
1961 1962% 1972 1991% 1992 5 l# 022% e0Si# 2052 
e08e# 2093 elic# e21l13% 2124 2149# 1S0# 161 2186% 2187% 2198 227 4% 
BNS3 001906 427% 1305 1342 13793 1416 1483 1490 1S27 1574 lé21 1668 1705 
1780 18i8 2275*# 
ANS4 00101 428% 1309 1346 1383 1420 1457 i494 1$31 1S78 1625 l&72 3709 
1784 1822 2276 
ANSS 001012 4298 
ANSE 1014 4308 
ANS? OS1016 431% 
ANSE 001926 4328 
H4§ Ol1l22c0 2305* 23078 e2308% e322% 2323 23ec6*# 23378 
BEG 00102 415 436% 
BEGIN Q00106e 440 4458 2214 2216 
SELL = 000207 ~J0% 2206 e254 
OAT} 001200 469¢ 472 
710 Q0177¢2 666% S69 
OATi1  O00e2110 7038 706 
DATE Ge176b 7328 735 
ORTIZ 902314 7708 773 
ORT14 QO0e%32 807% 810 
caTi§ O0eSel G38 838 
VETIE O0eECE BESs SEE 


{ 


KE 


I 


Y 


MAT -11-DEFPK 
DCF Pil 
DATI?  O02676 
DaAT2 001266 
DATeD 002766 
Rats 3064 
Bares Grade 
DRTeS 8 60034S4 
Daze 003552 
DaATe7 003650 
T3 001354 
DAT30 G0374%6 
DAT31 ee 
SAT32 145 
DAT33 «004266 
DAT 004406 
DATSS 
DAT36 OQOO0464e 
DAT37 Q0%760 
DATS 00144e 
DAT4YO O05076 
DAT41 005214 
DAT4¥2 005332 
DAT43 
T44  QO0S6i6 
DAT4S 0057 
DAT4& OO061 
DAT47 
DATS 001 
DATSO 
DATSi  O06S06 
DATS2 
DATS3 006730 
DATS 3 
DATSS 007134 
OPTSE 007236 
DATS7 007 
DATE 091616 
ATED 744 
DAT61 
DAT6be O07646 
DAT63 O00 
DAT64 ## O100S6 
DATES 010202 
DAT7 001704 
DISPLA= 177570 
DONE 010322 
DWNVEC 011574 
ERROR OQlle2e 
ERRORS Ollble 
FES 001024 
FEC 001022 
F TERR QOO0076EC 
PIT = 001214 
rprt 002005 


Chass REFERENCE TAB 


895 
S00 


RAVY BR DING 


Tur 
Ule-- 
Two 


1289 


bo bo Ba p+ p= ph &-+ = b= ps 


XP, STEXP 
LE -- USER SYMBOL 


MACY]! 271732) O3-SEP-76 14:10 PAGE SO 


2247 % 
2391* e2392e# c4e3s 
24288 
747 785 1561 1608 1655S 2290 
2875" 677 738% 743 77b# 781 1$Se*# 1557 


1599+ 


1604 


S452 


~—- ——<— <— _--+-* 


_————— *§ ee) ee ee ee le 


—=-e--- a EE  — a 


——e -——s- -— —iA;. ‘Alyy, Lee la Aa ee aye ll ay, as -——— SS ee LO ti TT em ee ee em Se ee em ee — 


——_- e+ ew me 


| MAINDEC-11-DCFPK-8 TEST OF LDEXP, STEXP MACY11 27(732) O3-SEP-76 14:10 PAGE Sl 


| DCFPKB.P1L CROSS REFERENCE TABLE -- USER SYMBOLS 
Bi Be et 2 
( j 
EHTS = Qossan re 
FPII4Y g0e446 8lls 
FPIIS ‘002534 839% 
'FPII6  O0e626 8688 
FPII? «© 002716 8978 
FPI2 001302 Sls 
-FPI20 «©00300e 92S 
FPI21 003100 9S4e 
| ePIee 003176 983% 
'€PTS3 «003274 10les 
| FPI24 003372 041 
~FPIeS 003470 10708 
FPI26 003566 099 
-FPI27 003664 11288 
-FPI3 001370 Soo 
FPI32 46004166 12188 
FPI33 004306 12548 
FPI34 QOO04426 12908 
FPT3S) «= o04s44 13278 
FPI36 OO4%662 13648 
F—PI37 o0S000 14018 | 
FPTY = =s- OO 456 SS78 ! 
FPIYO 005116 14388 | 
FPT4Y] 905234 14758 | 
FPT¥2 005352 1Sles | 
FPI43 005470 iSSOs =«-:1561 | 
FPT44 905636 15978 1608 | 
FPI4S 16448 1655 ! 
FPI4R 006152 16908 : 
FPI47 006270 17278 | 
FPIS Oo1S44 Ses | 
FPTSO § 006412 17658 
FFIS1  OQ06S3e 18038 
“PIE O0163e 6138 | 
FFI7 901720 641% | 
FPS §= =~900000 3818 418%  474*x 475 Soex 503 S30* 531 ssex 559 Se6x 587 614% | 
615 642% 643 671% 673 8% 799 737% 739 776% 0777 Blox 9813 | 
840% 4] 869% 0 898% g 29 ? S 996 987 1015s 
1016 w044* 1045 1073 1074 1102 1103 ii3ix 1132 ible L162 191% 1 | 
leche lee lebes 1263 1291% 1328 1329 1365*% 136 140e# 1403 1439% | 
6 1476% 14 1513 1514 155ix 1553 1598% 1600 j64S* 1647 #£«®41691" 1692 | 
1728s 17 176b% 1804* 1805 1843* 1844 1873s 1903 1904 1933% 
1963 1964 1993% 1994 2023* 202 20S53# 2054 2084s 2085 el1is* 2ilé | 
21Six 215 2188% 2189 2283 | 
FPTADR O11S&E 442s UP Le | 
FPYECT 115769 usoe = 4S 24224 | 
HLT = 194000 378% 477 486 Sos S10 S14 533 533 suo S61 S65 S7 | 
589 S94 598 617 622 626 64S 650 654 675 §79 693 698 | 
£92 711 716 720 74] S 749 754 758 779 793 797 792 
7396 g15 820 B24 843 a4 8s2 872 977 38 30 906 0 
13a! 338 939 360 964 9 989 993 997 1018 1022 1026 10% 


woceces +=: © ——— —— ._— — —— * ™ - -_-, ——_-< -_ —- * -—— ~- = ~———e 8 © ee ee ee ee ee ee oc re eee eee ee ee i ee ——_—_—— in lly me a 


me 


; 
MAINDEC- 11-DCFPK-8 TEST OF LDEXP, STEXP acy I 27(732) O3-SEP-76 14:10 PAGE Se | 
oCFPKB.P CROSS REFERENCE TABLE -- USER SYMBOL | 
1410 1414 1418 14 144 1447. 14 14S 1479 «=: 1484 )=~—Ss«ds4g8 14S 
1496 §=«.-—«AS 16 teat 1258 152 1533 ded 128 156 1568 1872 1576 ~~ 158 
1602 1606 1610 1615 1619 £1623 #81627 tea 1653 1657 # £1662 I666 ~§# 1670 
1674 = 1694 »~=Ss«d1699~Sfs«d1703~C*«é‘<21707*~C~«é: 72d: (G&s«éid‘ 7B 1736 1740 §©6©1744 «86961748 )~=—s(«1769~—SOtés«dL:'7°7744 | 
i778 1782 £1786 #$(‘(1’807 «©1812 1816 #1820 1824 #=1684% +®«&>1850 1854 1876 1e8C 
1984 1906 1910 1914 #1936 1940 194% #£=*1966 # #=1970 ©1974 1996 2000 2004 
20e 406s ehk030-s034)=s(«iSeSi‘i‘iNC(<é‘ikH SO i2087—i8d)2Si9SS_—(iLIBCtCi‘éM2—“‘<é‘éC«LSY 
. 2159 2163S ss 2191)—ss—sa2196—St—é POD 
-ICNT 901000 4YO4Us 4O8% 2228 2236 2238 2240% 2241% 2243 2246*% 2247 2299% 
ILLUP = 011460 2349 23968 
IT 010540 22330 /(s239siMGH OS 2301 2S 2304 
LAD 011610 4S9x e242% 2248 2250 P4278 
Osc = 170004 4098 
LoUS = 170003 40S#8 
‘S = 170006 4088 
Mil2e06=s 901054 437 442% 
= OO0006E 3738 ©6460 4yg8e Site S44e S728 6008 6288 #6568 6948 ###7228 #7608 798% 
8268 8S4e 6838 Slee His 9708 #9998 19288 10578 10868 11158 11448 11748 
12048 12408 12768 13138 13508 13878 #14248 L4Y6i8 14988 15358 15828 16298 16768 
17138 17508 17888 18268 18568 18868 19168 19468 19768 20068 20368 20668 2997% 
elese 21658 e2e0e# 

OVER g10S44 2229 Ss 78 | 
P> =7000007 3908 1218% 1254% 2143 e2180% 2256% 2334* 2347% 234% | 
POWDWN 011264 448 2349# 239] | 
POWUP 011354 2368 23718 | 
PFINTR 011062 2264 #2267 #«2280 2288 $2291 23058 
PRINTS 011072 23078 
PS =s_ =—:«177776 374 926 9ss 984 1013 1042 ~»# 1071 1100 1129 «©1158 )«=—s«d388)=—s«iak2eSs«d ED 

1841 1871 1901 1931 1961 1991 e021 2051 208i ell12 2149 #218 
RETURN 011552 2260 «= 4168 
RO  ©=._:« = 900000 3828 451% 2217% 2266 2344 2361 2380% | 
Ri  =~000001 3838 1157 1160 2362  $2372% 2373%  2379% | 
Re =~p0000e 3848 857% 868 #=i802e* 1803 2363 £2378% | 
P3 =x000003 3858 896% 897 2080% 2083 2230% 269% 2302 2364 ####2377% , 
RY =7000004 3868 1187 #1190 e111 2114 2257 £2270% 2277% 2281% 2292% 2309 2310% 2328 | 
2333% 2365  2376% | 
PS =Ss = 00005 3878 1764% 1765 2366 $2375% } 
SAVEG 011564 2367% 2371 24208 | 
SAVLAD 0610520 2235 3=s_s el) = 22449 : 
SCOPE = i04400 377% 466 494 S22 SSO 578 606 634 663 700 729 767 204 | 
832 860 889 918 947 976 1005 1034 ###i083 1992 ~»=$1i1e! 1150 3S s«1180 | 
1210 1246 1282 1319 #1356 392 1430 1467 1504 1643 1589 1636 1682 | 
i719 «1756 )«~=Ss«1794”—iéi‘«dBDSCiéLBHP—(sCsd'HGE—(as‘«ia'GRS-—sd1SRSsi19HS Ss De «2S 02S 72 2S 21103 | 
2134 2171 #2203 | 
SP _ =“000006 389% 436% ##446x 2367 # 2371% ) 
SPACE O11555 2265 2268 ##$=%2278 # +2285 2289 24178 
Stag = 170005 46s : 
STo0 = 170007 407% . | 
CcwR = 177576 oat mi: 5-10) a -7-18)\- R11 “SO -7-7-)- a -7 2 | 22 |= 7-1 |. 7 -F— 7-1 i 1 P| | 
cu08 = 404% e226 2300 | 
cw0¢ = 901000 W038 2296 \ 
SWiD «= 9920090 uNew 2204 2252 
SWil = OO04000 4018 2234 
cule = g10cAd 406% 2205 
Swiz = ceo000 3958 2258 


ee 


~——_—— 


| MAINDEC-11-DCFPK-B 


DCFPKB.P11 
SWw14 = 040000 
SW1S = 100000 
TIMES 011614 
mt ie 
teti0 | O177 
TST! 2114 
TSTl ele 
TST13 002320 
rST14 8 8©0024%36 
TSTi§ 002524 
TST1& O0eb6le 
TST17 4 =©>—©. 00 e702 
TSTe 001272 
TSTeQ  O0e77e 
‘STtel 903070 
~TSTe2 003166 
-T$T2e3 003264 
TSTe4 003362 
TST2eS 003460 
Stee G03556 
TST27 003654 
TST3 001360 
TST30 6003752 
TST31 OO040S2 
TSt32e O0415S2 
TST33 OO04%27e 
ST34 © OO4416 
TST3s 
TST36 §«=©6.: G42 
TST37 004770 
TST4 001446 
TST4O0 OO0S106 
TST4] 005224 
TST4¥2 O0534e2 
TST43 O0S460 
TST44 
TST4S 905 
TST46 O06142 
TST4? 
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